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275  PTAS. 


“duende”  de  los  Commodore 


GALERIA  DE  SOFT 


El  programa  para  el  procesador  de  tex¬ 
tos  para  el  Commodore-64  EASY  SCRIPT 
convierte  al  C-64  en  un  procesador  de  tex¬ 
tos  muy  potente  que  dispone  de  todas  las 
facilidades  de  una  máquina  dedicada  que 
pudiera  costar  miles  de  libras. 

Está  escrito  totalmente  en  lenguaje 
máquina,  el  cual  permite  una  velocidad 
realmente  alta,  con  una  capacidad  de 
aproximadamente  30.(100  caracteres  de 
texto,  es  decir,  más  de  750  líneas  de  texto. 
Con  EASY  SCRIPT  los  textos  se  pueden 
crear,  salvar,  recuperar  y  modificar 
mediante  el  uso  bien,  de  la  unidad  de 
disco  1 54 1  o  la  grabadora  C2N,  Incluso  se 
puede  transferir  ía  información  tanto  de  la 
unidad  de  disco  a  la  grabadora  como  de  la 
grabadora  a  la  unidad  de  disco. 

El  texto  se  almacena  en  disco  o  en  cinta 
en  unos  ficheros  de  datos  estandard  que 
pueden  ser  leídos  por  los  programas  en 
Basic,  De  esta  forma  EASY  SCRIPT  dis¬ 
pone  de  la  capacidad  de  leer  La  informa¬ 
ción  creada  a  partir  de  un  programa  en 
Basic, 


DE  COMPRAS 


PRECIO:  20.000  PTS. 


Para  introducir  un  texto  muchas  tedas 
funcionan  igual  que  para  un  programa  en 
Basic,  por  ejemplo  las  teclas  del  control 
del  cursor, 

Ademmás,  55  potentes  comandos  de 
editar  están  disponibles  al  pulsar  una 
tecla. 

Una  vez  introducido  el  texto,  existen 
más  de  35  comandos  de  formateado  que 
pueden  ser  utilizados  para  modificar  la 
forma  en  que  se  imprime  el  texto. 

Algunas  de  las  facilidades  disponibles 
en  EASY  SCRIPT  se  presentan  a  conti¬ 
nuación: 

Búsqueda  y  Sustitución. 

Relleno  automático  de  bloques  variables. 
Centrado  y  Justificación, 

Modalidades  de  Borrado  e  Inserción, 
Desplazamiento  (Scrolling)  en  todas  las 
direcciones. 

Series  de  ficheros  encadenados. 
Tabulaciones  horizontales  y  verticales. 
Modalidad  y  encolumnado  de  números 
decimales. 

Cabeceras  y  Pies. 


EASY  SCRIPT 


Procesador  de  Textos  para  C-64 


EASY  SCRIPT  no  solamente  fun¬ 
ciona  con  las  impresoras  matriciales  1515 
y  1525,  sino  que  también  maneja  otras 
marcas  populares,  incluyendo  la  serie 
EPSON  MX  y  hasta  las  impresoras  de 


margarita  con  letras  de  calidad  de 
imprenta. 

El  texto  se  introduce  fácilmente  en 
EASY  SCRIPT  y  sólo  hace  falta  pulsar  la 
teda  RETURN  al  final  de  cada  párrafo. 


Numeración  automática  de  las  páginas. 
Manejo  de  discos  y  cintas. 
Combinación  (merge)  de  párrafos  o 
ficheros. 

Pleno  control  de  la  impresora. 


En  el  próximo  número  se  publicará  un  amplio  articulo  sobre  cómo  generar  Caracteres  Especiales  con  EASY  SCRIPT 


LAS 

DE 


Para  el  VIC-20 


TORRES 

HANOI 


PRECIO:  1,500  PTS, 


Tradicionalmente  este  juego  se  hace  con  tres  palos 
verticales  y  unos  aros  de  diámetros  diferentes.  Al  inicio  se 
colocan  todos  los  aros  en  un  mismo  palo  de  menor  a 
mayor.  El  juego  consiste  en  pasarlos  a  otro  palo.  Solo  hay 
dos  reglas:  Nunca  puede  estar  un  aro  sobre  otro  de  diáme¬ 
tro  menor,  y  sólo  se  puede  tomar  el  aro  superior  de  cada 
torre. 


Estos  paquetes  están  distribuidos 
por  Microelectrónica  y  Control 


MATEMATICAS- 1 

PROGRAMA 
NIVEL  BUP 
PARA  VIC-20  CON 
8  Ó  16  K 

Este  es  un  programa  que  plantea  tests  de  matemáticas  y 
geometría.  El  VI C  preguntará  el  tema  que  prefiere.  Usted 
cargará  la  cassette  de  datos,  una  vez  el  VI C  haya  encon¬ 
trado  el  cuestionario,  usted  podrá  empezar  a  contestar. 
Usted  puede  pasar  pulsando**  Reí  urn”  o  finalizar  el  test 
tecleando  “Fin*\  Una  vez  finalizado  el  test,  se  le  presentará 
la  puntuación,  el  tiempo  empleado  y  la  posibilidad  de  con¬ 
testar  las  preguntas  pasadas.  Si  dice  "N*\  el  VIC  ofrecerá 
un  menú  con  tres  posibilidades: 

— Otro  test 
— Revisar  test 
— Fin 

En  cuyo  caso  el  VIC  presentará  la  portada  del  programa. 
NOTA:  En  el  test  de  tiempo  no  dice  si  la  contestación  es 
correcta  o  no. 


PRECIO:  2.000  PTS. 

en  cinta 
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Un  lector  »»#  (ó®  mas#,*?) 
viajará  a  Estados  Unidos  con  Commodore  World 


Porque  estábamos  seguros  del  éxito  de 
Commodore  World,  pero  no  tanto, 
sobramos  que  iba  a  “  caer  bien1"  y  sobre 
todo  que  iba  a  llenar  un  hueco  muy  impo¬ 
tente  en  la  gran  familia  Commodore  —sin 
embargo,  sinceramente,  no  nos  esperába¬ 
mos  la  súper  gran  acogida  que  ha  tenido—. 
Hoy  al  redactar  estas  líneas,  1 5  de  febrero, 
a  sólo  1 5  días  de  su  salida  o  la  calle,  hemos 
superado  lo  línea  de  los  3.500  suscriptores  y 
nos  estamos  acercando  rápidamente  a  los 
4.000  y  el  buzón  se  nos  ha  quedado  pequeño 
recibiendo  correspondencia  de  todos  los 
que  formáis  el  gran  equipo  de  Commodore 
World,  Y..,  se  ocabó  el  hablar  y  domos 
auto-bombo,  sarnas  al  grano  y  seguid 
leyendo,  que  lo  que  sigue  es  de  “super- 
interés  para  todos, 

Suscriptores 

y  el  n-  5.000...  ¡SINGO! 

Las  suscripciones  se  acumulan  en  la 
redacción  y  en  el  teléfono.  En  el 
momento  en  que  se  abre  un  sobre,  se  recibe 
una  tarjeta  o  se  apunta  una  suscripción  tele¬ 
fónica,  se  apunta  el  número  correspon¬ 
diente  a  esa  suscripción,.,  Pues  bien,  el  sus- 
criptor  al  que  le  corresponda  el  n9  5.000 
y  yo  hemos  superado  los  3.500,  se  encon¬ 
trará  automáticamente  con  un  viaje  a 
Estados  Unidos,  donde  visitará  la  fabrica 
y  casa  madre  de  Commodore..,  Si,  habéis 
leído  bien,.,  no  es  ningún  error  de  imprenta, 
(Bueno!  ¿Y  los  demás  suscriptores,  qué?  —Eso 
no  es  justo—  vale,  de  ocuerdo,  sobre  todo 
pora  los  4  999  primeros  que  han  hecha 
posible  que  el  número  5.000  conte  B1NGO. 
Pues,  aunque  no  está  decidido  todavía  qué 
será,  adelantaremos  que  organizaremos 
olgún  tinglado  paro  lodos,  tanto  los  pre- 
5.000  como  los  post-5,000  y  algo  especial 
paro  los  primeros  4.999  que  anunciaremos 
en  cuanto  se  hoya  decidido,  y  veréis  que 
nosotros  no  nos  dormimos  en  los  laureles  y 
hocemos  las  cosas  rápido  (adelantamos  que 
hay  viajes  y  aventuras  por  medio}. 


Les  “VIEJOS  LEALES”  y 
les  i»s  13,  14  y  15 

Hemos  tenido  algunos  llamadas  de  anti¬ 
guos  suscriptores  del  Club  Commodore 
que  no  hon  recibido  los  n9  13,  14  y  15,  Lo 
más  probable  es  que  por  coincidir  con  lo 
época  de  transición  hayo  habido  algún 
traspapefeo  involuntario,  A  los  que  os  hoyo 


ocurrido  esto,  escribid  (no  por  teléfono)  a 
Microelectrónica  y  Control  de  Barcelona, 
c/  Taquígrafo  Serró,  7,  especificando  a  lo 
atención  de  Rere  Mosats,  Pere,  ton  impres¬ 
cindible  hoy  en  Commodore  World  como  lo 
fue  antes  en  Club  Commodore,  estará 
encantado  de  remitiros  los  ejemplares  que 
os  faltan  a  vuelta  de  correo. 


Market-Club 

Mercadillo-Clubs-Boba  de  trabajo 

retendemos  que  MARKET-CLUB  seo  una 
importante  sección  al  servicio  de  toda  la 
familia  Commodore.  A  partir  de  hoy  mismo 
se  dividirá  en  tres  apartados;  MERCADILLO, 
CLUBS  y,  muy  importante,  BOLSA  DE 
TRABAJO. 

MERCADILLO:  Será  para  todo  el  cambala¬ 
che,  equipos  usados,  ofertas,  demandas,  etc, 
CLUBS:  La  propia  palabra  lo  explico. 
Información  de  Club  Commodore  por  todo 
el  país  tanto  de  los  que  existen  como  de 
usuarios  que  están  buscando  uno  ya  for¬ 
mado  en  su  zona  o  de  aquellos  que  quieran 
formar  uno  nuevo. 

BOLSA  DE  TRABAJO;  Este  es  el  aportado 
que  con  mayor  ilusión  comenzamos  y  pre¬ 
tendemos  que  sea  una  importantísima 
'estrella''  de  Commodore  World,  Por  un 
lado,  un  gran  número  de  “  Commodorionos 
son  gente  joven  que  esta  buscando  empleo 
por  primera  vez,  por  otro  lodo,  dentro  de 
los  "Commodorionos'  maduros  y  semi- 
maduros  hay  los  que  se  encuentran  en  paro 
y  creemos  que  nuestra  revista  puede  prestar 
un  gran  servicio  en  este  compo. 

Todos  los  anuncios  serán  gratuitos 
excepto  para  las  Compañías  que  ofrez¬ 
can  servicios,  productos  o  empleo  o  quienes 
se  les  cobrará  300  pesetas  por  línea. 

Todos  los  anuncios  llevarán  un  número  de 
referencia.  Os  rogamos  que  cuondo  yo  no 
se  necesite  publicar,  nos  lo  comuniquéis, 
nombrando  este  número,  paro  suprimirlo. 


Programas  y  errores  ... 

Aportir  de  este  número  que  tenéis  en  la 
mano,  podemos  garantizaros  que  todos 
los  programas  y  juegos  que  se  incluyen, 
vayan  completamente  comprobados  y  sin  el 
más  mínimo  error  (dentro  de  lo  humana¬ 
mente  posible),  Diego,  el  '"cerebro'  del 
equipo  editorial  ha  hecho  todas  tas  horas 
extraordinarias  del  mundo  paro  asegurarse 
de  que  todos  los  listados  van  perfectos. 


Sin  embargo,  lamentamos  que  en  nuestro 
primer  número,  debido  af  gran  trabaja  de 
lanzamiento,  no  pudimos  ser  tan  concienzu¬ 
dos  y  parece  ser  que  se  nos  ¡ni  redujo  un 
duende  travieso  en  la  línea  850  de  Vídeo 
Casino-Tiro  al  Blanco.  Un  lector,  nos  ocabo 
de  llamar  diciendo  que  tenía  problemas  con 
esta  lineo.  Vamos  a  revisar  este  programa  y 
os  diremos  lo  que  hay  en  nuestro  próximo 
número.  Quisiéramos  poder  sacaros  de 
dudas  ahora  mismo  pero  tenemos  que 
entrar  en  imprenta  y  no  do  tiempo, 

...Y  servicio  de  cintas 
para  los  más  vagos. 

Aquellos  lectores  que  os  canséis  de 
teclear  un  programa  (no  os  preocupéis 
ni  os  dé  vergüenza,  ¡sucede  en  todo  el 
mundo!)  (¡por  eso  existe  el  soft!)  podéis 
pedir  o  lo  editorial  la  cinta  def  programa  y 
número  de  Commodore  World  en  que  opo- 
rece,  adjuntando  un  cheque  por  el  importe: 
875  pesetas  por  cinta  y  75  pesetas  para  gas¬ 
tos  de  envío  — cuidado,  75  pesetas  por 
paquete,  no  por  cinta—.  Los  que  vivís  en 
Madrid  podéis  recoger  los  cintas  en  lo  edi¬ 
torial  y  no  pagar  las  75  pesetas  {llamad 
antes  par  teléfono  paro  tenerlas  preparadas). 


Carta  Blanca 
y  Seamos  Preguntones 

Dos  nuevos  secciones;  CARTA  BLANCA 
habla  por  si  misma  —cartas  del  lector 
con  todo  lo  que  tengáis  que  decir,  opinar  o 
sugerir—  tenéis  “carta  ¿lonco  .  SEAMOS 
PREGUNTONES  — seámoslo,  por  favor— 
preguntad  rodo  lo  que  os  Interese  sobre  los 
Commodore,  su  funcionamiento,  formas  de 
darle  mayor  rendimiento  o  capacidad,  pro¬ 
gramación,  etc.  Contestaremos  todo  lo  que 
podamos  y  si  hay  algo  que  no  sepamos  con¬ 
testar,  la  pregunta  queda  hecha  como  deso 
fio  a  los  lectores  listos '. 


Chavales 

Especial  para  vosotros 

No  nos  hemos  olvidado  de  vosotros.  Aun¬ 
que  sabemos  que  los  Commodonanos 
infantiles  son  unos  superlistos  que  pueden 
manejar  un  montón  de  las  cosas  que  apare¬ 
cen  en  lo  revista,  a  partir  del  próximo 
número  tendréis  la  sección  especial  para  los 
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más  ¡ovencillos  de  la  familia,  aunque  mucho 
nos  fememos  que  los  adultos  3o  van  a  echar 
más  de  un  vistazo  o  hurtadillas.  Así  que 
atención,  nuestros  '  duendes'1  ROM  y  RAM 
os  esperan  en  el  próximo  numero  y  can 
algún  programilla  especial  para  vosotros 
—que  no  pase  como  en  "el  tren "  que  luego 
es  papá  el  primero  que  lo  usa...  (jo  mamá!). 


Suscripciones  por  teléfono 

Podéis  suscribiros  por  teléfono  (91) 
259  54  78  preguntando  por  Valerle  o 
Mario. 


van  a  darse  por  grupos  de  edad,  no  olvidéis 
poner  vuestra  edad.  En  nuestro  número  1 
decíamos,  por  error  de  imprenta,  que  los 
programos  deberían  venir  todos  con  cinto  o 
disco  —rectificamos —  deben  venir  todos 
con  el  listado  completa  en  impresora  —la 
cinta  si  es  pasible  enviarla,  mejor,  la  devol¬ 
veremos  inmediatamente  con  otra  de  regala. 
Enviad  todas  vuestras  colaboraciones  a 
nuestra  editorial  en  Madrid. 

IMPORTANTE:  Recordamos  que  si  no 
especificáis  que  por  razones  personales  no 
queréis  que  se  publique  vuestro  dirección, 
todos  los  colaboradores  aparecerán  con 
nombre  y  dirección  pora  que  podáis  pone¬ 
ros  en  contacto  unos  con  otros. 


Anuncies  en  la  revista 

■PROVEEDORES: 


anuncior  vuestros  pro- 
ducfos  compatibles  con  micros  Conv 
modore  (software,  periféricos,  interfaces). 
TIENDAS  DE  MICROS  Y  PRODUCTOS: 
Anunciar  vuestros  locales  paro  que  nuestros 
lectores  puedan  saber  a  dónde  dirigirse. 

Llamando  a  Barcelona:  212  73  45  y  pre¬ 
guntar  por  Neus. 

Llamando  a  Madrid:  259  54  78  y  pregun¬ 
tar  por  Enrique. 


Curiosidades 
sobre  los  Commodore 


El  otro  día  nos  dijeron  que  un  famoso 
campanario  de  un  pueblo  está  funcio¬ 
nando  de  nuevo  después  de  muchos  años  de 
estar  cosí  callado.  El  milagro  se  debe  o  que 
esta  siendo  manejado  por  un  VIC  y  unos 
dicen  que  consigue  un  cambio  de  melodías 
precioso.  Los  que  sepáis  de  casos  en  que  se 
emplean  los  Commodore  pora  cosas  que  os 
sorprendan,  contádnoslo  —puede  dar  ideas 
a  la  gente  de  lo  mucho  que  pueden  hacer 
con  uno  maquíníta"  y  ol  mismo  tiempo 
puede  haber  anécdotas  divertidas. 


Distribuidores:  Copias  de  nuestro 

nota  especial  para  vosotros  predecesor  Club  Commodore 

Nosotros  no  disponemos  de  copias  origi 
nales  de  Club  Commodore  ya  que 
Microelectrónica  y  Control  los  tiene  agota¬ 
das.  Por  eso  ofrecemos  un  servicio  de  foto¬ 
copias.  Los  que  deseéis  estos  fotocopias, 
enviad  por  favor  el  boletín  de  la  página  5. 
No  hay  ningún  problema  en  realizar  sus¬ 
cripciones  por  teléfono,  sin  embargo,  el  ser¬ 
vicio  de  fotocopias  realizarlo,  por  favor,  por 
escrito.  Unos  quieren  toda  la  colección, 
otros  desean  números  sueltos  y  por  escrito 
no  puede  haber  malos  entendidos.  Dadnos 
un  margen  de  dos  semanas  para  su  entrego. 


Veréis  en  CARTA  BLANCA  (página  45) 
que  muchos  lectores  piden  información 
sobre  hard,  soft,  juegos,  etc.  Enviadnos  listas 
e  información  siempre  con  precios.  En 
Galería  de  Soft  (páginas  2  y  59]  pretende¬ 
mos  publicar  reseñas  de  paquetes  —enviad¬ 
nos  una  capia  de  los  programos  que  deseéis 
se  reseñen  para  su  comprobación.  La  edito¬ 
rial  se  reserva  el  derecho  de  decisión  sobre 
la  publicación  de  las  reseñas.  Siempre  se 
publicará  el  nombre  del  distribuidor  corres¬ 
pondiente. 


Recordamos  que  para  todos  las  colabo¬ 
raciones  que  se  envíen  va  a  hober  sor¬ 
teos  y  premios  (ver  Commodore  World  ng  1). 
Como  los  premios  especiales  a  los  mejores 


EJEMPLARES  ATRASADOS  DE  «CLUB  COMMODORE 


[Poner  una  X  debajo  del  número  de  edición  pedido) 

Peticionario:  D . . . . . 

Calle  . . . . . * . 

Población  . . * . . . 

Forma  de  pago  por  cheque 

La  colección  completa  del  O  al  15:  2,500  ptas,  + 

Incluyo  cheque  por  . . ptas. 


rovmcia 


Precio  de  la  edición  fotocopiada:  250  ptas. 


commodore  world 


DESEO  SUSCRIBIRME  A 
COMMODORE  WORLD  POR 

UN  AÑO  AL  PRECIO  DE 
2.200  PTS.  DICHA  SUSCRIP¬ 
CION  ME  DA  DERECHO, 
NO  SOLO  A  RECIBIR  LA 
REVISTA  (ONCE  NUMEROS 
ANUALES)  SINO  A  PARTICI¬ 
PAR  EN  LAS  ACTIVIDADES 
QUE  SE  ORGANICEN  EN 
TORNO  A  ELLA  Y  QUE 
PUEDEN  SER  COORDINA¬ 
CION  DE  CURSOS  DE  BASIC, 
INTERCAMBIOS  DE  PROGRA¬ 
MAS,  CONCURSOS,  ETC 


EDAD 


NOMBRE  ... 
DIRECCION 
POBLACION 
TELEF . 


.)  PROVINCIA 


MARCA  Y  MODELO  DEL  ORDENADOR 


CIUDAD  DONDE  LO  COMPRO  .  DISTRIBUIDOR 

APLICACIONES  A  LAS  QUE  PIENSA  DESTINAR  EL  EQUIPO  . 


Deseo  iniciar  lo  suscripción  con  el  n°  I 
Adjunto  cheque  de  2.200  pesetas 
Reembolso  más  gastos  del  mismo 
ol  recibir  el  primer  nG  de  la  suscripción 

[Enviar  □  lo  dirección  del  dono| 

Extranjero  $35,  Solamente  por  correo  aéreo 
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Clave  para  interpretar  los  listados 


Todos  los  listados  que  se  publican 
en  esta  Revista  han  sido  ejecu¬ 
tados  en  el  modelo  correspondiente 
de  la  gama  de  ordenadores  CGM- 
MQDORE.  Para  facilitar  la  edición 
de  los  mismos  en  la  Revista  y  para 
mejorar  su  legibilidad  por  parte  del 
usuario,  se  les  ha  sometido  a  ciertas 
modificaciones  mediante  un  programa 
escrito  especialmente  para  ello.  Para 
los  programas  destinados  a  los  orde¬ 
nadores  VI C-20  y  COMMODORE  64. 
en  los  que  se  usan  frecuentemente  las 
posibilidades  gráficas  del  teclado,  se 
han  sustituido  los  símbolos  gráficos 
que  aparecen  normalmente  en  los  lis- 
lados  por  una  serie  de  letras  entre 
corchetes  ||  que  indican  la  secuencia 
de  teclas  que  se  deben  pulsar  para 
obtener  el  carácter  deseado.  A  conti¬ 
nuación  se  da  una  tabla  para  aclarar 
la  interpretación  de  las  indicaciones 
entre  corchetes: 

fCRSRD]  =  Tecla  cursor  hacia  abajo 
(sin  SHÍFT) 

[CRSRU]  =  Tecla  cursor  hacia  arriba 
(con  SHIFT) 


[CRSRR]  =  Tecla  cursor  a  la  derecha 
(sin  SHIFT) 

[CRSRL]  —  Tecla  cursor  a  la  izquierda 
(con  SHIFT) 

[HOME]  =  Tecla  CLR/HOME 
(sin  SHIFT) 


INDICE  ANUNCIANTES 


BASIC  MICRO .  21 

CASA  DE  SOFTWARE .  49 

COMMODORE  64 .  60 

COMMODORE  WORLD .  16 

(Sufcripctones) 

EAF . . . . . .. .  29 

ELEKTROCOMPUYER  .  17 

MARKETCLUB  . 58 

MICROSISTEMAS  . . 25,42 

TECNHEL _ _ _ 39 

VIC-20  . . 33 


[CLR]  -  Tecla  CLR/HOME 

(con  SHIFT) 

Las  indicaciones  [BLK|  a  |YHL| 
corresponden  a  la  pulsación  de  las 
teclas  de  1  a  8  junto  a  la  tecla  CTRL. 
Lo  mismo  sucede  con  [RVSON]  y 
¡RVSOF]  respecto  a  la  tecla  CTRL  y 
las  teclas  9  y  JO. 

El  resto  de  las  indicaciones  constan 
de  la  parte  COMM  o  SH1F  seguidas 
de  una  letra,  número  o  símbolo  — por 
ejemplo  [COMM+j  o  [SHIFA] — . 
Ésto  indica  que  para  obtener  el  grá¬ 
fico  necesario  en  el  programa  deben 
pulsarse  simultáneamente  las  tedas 
COMMODORE  (la  que  lleva  el  logo¬ 
tipo)  o  una  de  SHIFT  y  la  teda  indi¬ 
cada  por  i  a  letra,  el  número  o  el  sím¬ 
bolo,  en  el  ejemplo  anterior:  COMMO¬ 
DORE  y  +  o  SHIFT  y  A.  respecti¬ 
vamente. 

En  los  signos  gráficos  además  se 
cuenta  el  número  de  veces  que  apa¬ 
rece.  Por  ejemplo,  [7  CRSRR]  equi¬ 
vale  a  7  pulsaciones  de  la  teda  cursor 
a  la  derecha  y  [3  SPCJ  tres  pulsaciones 
de  la  barra  espadadora.  ■ 


[Commodore 
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Pedro  Muguruza,  4-8g  B 
Teléf.:  259  54  78 
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Mathquiz” 

Diviértete  con  las 
matemáticas 


Esto  es  un  programa  sencillo  que  utiliza  las  caracte¬ 
rísticas  del  VIC-20  ó  el  Commodore  64  (gráficos, 
colores,  cronometraje  y  sonido)  para  servir  de  repaso  de 
las  matemáticas  estudiadas  en  la  escuela. 


COMMODORE  64 
o 

VIC-20 

(sin  ampliación) 


La  rutina  en  “Mathquiz",  un  pro¬ 
grama  escrito  para  ejecutarse  en  el 
VIC-20  no  ampliado,  es  una  forma 
modernizada  de  las  antiguas  tarjetas 
que  comprobaban  la  habilidad  del 
niño  para  sumar,  restar  o  multiplicar. 
Dado  que  el  programa  presenta  no 
sólo  problemas  cuyas  respuestas  nor¬ 
malmente  se  memorizan,  sino  tam¬ 
bién  problemas  que  tienen  que  ser 
calculados,  se  amplían  y  se  refuerzan 
las  técnicas  matemáticas  aprendidas 
en  los  primeros  años  de  la  escuda. 


Commodore  World  Marzo  m4/7 


DIVIERTETE  CON  LAS 
MATEMATICAS 


Listada  i 


Existen  tres  niveles  de  dificultad 
para  cada  operación  matemática  (1,2 
ó  3),  siendo  el  nivel  1  el  más  fácil 
Estos  niveles  corresponden  a  la  suma 
o  resta  de  números  de  uno,  dos  o  tres 
dígitos.  Para  la  multiplicación,  los 
niveles  corresponden  al  producto  de 
dos  números  de  un  solo  dígito,  un 
número  de  dos  dígitos  por  un  número 
de  un  solo  dígito,  o  un  número  de  tres 
dígitos  por  un  numero  de  dos  dígitos 
divisible  por  diez. 

El  programa  selecciona  cada  uno 
de  los  dos  números  según  el  nivel  de 
dificultad  elegido,  pero  no  permite 
que  se  dé  un  número  negativo  en  una 
operación  de  resta.  Si  la  respuesta 
dada  por  el  estudiante  no  es  correcta, 
el  programa  presenta  una  nota  y  la 
solución  correcta.  El  estudiante  dis¬ 
pone  de  un  tiempo  fijo  para  solucio¬ 
nar  cada  problema,  y  se  permite  más 
tiempo  para  los  problemas  más  difíci¬ 
les,  Si  el  tiempo  se  agota,  un  sonido 


Nunca  ha  $id< 
aprender  comoc 


(beep)  le  indica  al  estudiante  que  míre 
la  pantalla,  donde  se  representa  La 
solución  correcta. 


El  sonido  de  la  música 

Cuando  se  han  estudiado  diez  pro¬ 
blemas,  La  puntuación  del  estudiante 
aparece  en  pantalla,  junto  con  un 
premio  musical.  La  canción  que  apa¬ 
rece  en  el  programa  es  la  preferida  de 
mi  hija,  Kathy,  pero  suele  ser  susti¬ 
tuida  por  cualquier  canción.  Esta 
parte  del  programa  (las  líneas  100- 
210)  ha  sido  sacada  del  manual  del 
VIC-2G,  La  canción  (las  líneas  300- 
380)  se  divide  en  cuatro  partes  (sepa¬ 
radas  mediante  un  -  i),  y  se  toca  toda 
la  canción  cuando  se  da  una  puntua¬ 
ción  perfecta.  Para  cada  pregunta  no 
acertada,  la  canción  dura  menos, 
proporcionando  así  un  incentivo  para 
que  todas  las  respuestas  sean  co¬ 
rrectas. 

Cuando  se  ejecuta,  el  programa 
pide  una  operación  matemática  (suma, 
resta  o  multiplicación),  seguida  por  el 
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Listado  2 


nivel  de  dificultad  (1,  2  ó  3),  A  conti¬ 
nuación  presenta  el  problema  en  pan¬ 
talla  en  posición  vertical  y  sitúa  el 
cursor  debajo  del  dígito  de  la  extrema 
derecha  para  que  se  saque  el  resultado 
de  dicha  columna.  Entonces  el  cursor 
se  va  desplazando  a  la  izquierda  hasta 
que  se  introduzcan  todos  los  dígitos. 

Por  lo  tanto,  se  daría  la  respuesta 
de  la  suma  nueve  más  cinco,  tecleando 
un  cuatro  seguido  por  un  uno.  El 
resultado  se  introduce  de  derecha  a 
izquierda  para  simular  el  proceso  uti¬ 
lizado  cuando  se  escribe  el  problema 
sobre  papel,  y  es  imprescindible 
hacerlo  así  cuando  se  estudian  pro¬ 
blemas  con  muchos  dígitos  cuyas 
soluciones  no  han  sido  mem orizadas. 
Se  proporciona  una  “goma  de  borrar" 
para  que  se  pueda  cambiar  un  número 
mediante  el  movimiento  del  cursor. 
En  el  ejemplo  presentado  antes,  si  se 
hubiera  tecleado  un  uno  primero,  se 
podría  borrar  mediante  la  pulsación 


tan  divertido 
el  “mathquiz 


de  la  tecla  apropiada  del  cursor,  per¬ 
mitiendo  la  introducción  de  un  nuevo 
número. 

Por  supuesto,  el  tiempo  que  se 
tarda  en  realizar  tales  correcciones  se 
descuenta  del  tiempo  asignado  para 
cada  problema.  Si  el  estudiante 
empieza  a  perder  el  interés,  se  puede 
modificar  el  color  del  siguiente  pro¬ 
blema  mediante  la  pulsación  de  la 
tecla  f7.  La  canción  también  puede  ser 
cambiada,  preferentemente  por  el 
estudiante. 

El  Listado  1  presenta  el  programa 
para  el  VIC-20,  y  el  Listado  2  para  el 
Commodore  4.  Los  niños  disfrutarán 
“jugando  con  el  ordenador"  mientras 
refuerzan  sus  conocimientos  matemá¬ 
ticos  con  este  programa. 


i  RE»  MATHflU  I Z  PARA  EL  C  -64  /— * 

7  CL-líREM  COLOR  DE  LOS  NUMEROS  M  ATHWU  J  í  fl  h* 

3  BEF  FNL  ÍXJ-X+40-tfi.*C-PP  G  4  J  L-J  M 

10  Si «34277: £2«3427¿:S3-34273:S4-34272:V-342*4 
30  GOTD00B 
¥9  PEM  CANO  10» 

1 00  POKEV  *  í  5  :  POKE  B  l  ,  ¥ 

10?  SFCfl-6-  -0TMEN210:  REM  LA  CANTIDAD  DE  CANCION  TOCADA  DEPENDE  DE  LA  PUNTUACION  " 

103  REH  SI  LA  NOTA  ES  -I  ENTONCES  PARAR 
103  READ  PUF  P--I  THENZ0Z 

120  RE ADPF . D:PDKE53,P:POKEE4,PP:PÚKEE2i 17 

L  é> 0  FDR  N*l  TÜ  100  4 II  :  NEXTH  :  RE»  CANSI  AP  100  PAPA  ALTERAR  EL  A I  T NO 

170  POKES2 . 141 FORN» l T D20 1 NEXTN 

¡*S  00T0 103 

202  CA-CA-Í  :í¡ÜTOi02 

210  POKE  V ,0i PE STQRE l GOTO! 600 

2**  RE»  TONO .RITMO 

300  DAT  A  1 4 . 24,2,  16,  103. 1,23,30, 3, 22. *6, 2 , 16» 1*3,1,14, 230, 3 

310  DATA  14, 24 , 1 . 14, 24 , 1 ,  14»  24 ,1*14, 23*.  1 , 16,  1*3,  1 , I H . 20*. 3,14,  103.3 , - 1 

320  DATA  14. 24, 2.  E6,  1*5. 1 . 23.30.3.22. *6, 2.  16.1*3,  1 , 14» 23*» 3 

340  PATA  14, 24, 2, 14,  1*3,  1 , 16,  1*3. 1,10, 20?,  1,21 .31,1 ,22. *6, 3,22, *6,3,  -1 

330  DATA23, 30, 1.3,16, 1*3, .3,16, 1*3. 1,21,31,1. 10,20*» I » 14, 1*3, 1.14,24,2 

360  DATA  16.  I ¥3, 1.22, *4. 3 , 10» 20*. 2» 22 , *6 ,  1 , Zft. 30, 2 . 22. 94 . 1 . 2 I , 31 . 3, I*, 1 ¥3 , 3» - 1 

370  DAT Al  4, 24, 2. 16,1*3,1. 23,30.3,22. ¥4,2,  14, 1Í5, 1 ,  14.23*, 3 

300  DATAÍ4, 24 , 2 . I  6 .  1*3. 1.16,1*3,1,10, 20* .1,21,31,1, 22, ¥4, 3 , 22, ¥4, 3» -l 

*00  PP INT ' f  CLP  1 ' : FP1 NT  F I SPC lSUWA«SF : PR  ÍNT - [ SPC JRESTA«R  * 

*03  PR1  NT  ■ CSFt 1WULT IFLICAC IDN«M *  1  PRINT  “  I  SPC  J  ELECC  10NC  SPC  17* 

¥10  OETl*: IFl**f ‘THER¥10 
*20  IFL*«'R*th£N  CN--ITOOTO1000 
*30  IFlí-^S'ThEN  CN-1 ;OOTO1000 
*40  IFL*-'M*TMEN  Ch-0 ; GOTO j 000 
¥30  QDTO*00 

1000  PRINT-  tCLRJ  ■  ¡PftíNT'Nl  VELtSPC  IDE!  £PC J DIFICULTAD^-  :PRINTM  . Z. QL SPC 1 3 t  -;PR1NT* 

E 1I8PC1ES15PC I MAE I SPC  3 F  AC I L 1 * 

1003  PRIhlT'ELECClEWCSPCI** 

1010  5ETL0:  IFL»«- MNEN10E0 
1020  IFL0Í-  1  -OfiL*3  f3'TkEn|0i0 
1030  P«1B1 i VAL1L41 -  1 I 
1060  CA«0iFORII«lTOlB:  PRJNTMCLRJ  “ 

1070  K«INT íRND E l  HFF610I  í  REH  ELEGIR  EL  PROBLEMA 
1074  F1*F 

1073  IFCM-0ANBF  >1THENF1*FM0 
1000  L-INT (AND! 1 I #F1*10S 
E  0*0  QN  CM  ■»  |  GQ  TOI1Í0.11 20 

1100  SN-43: IFL>KTHEM1070;REH  El  INI  NA  RESTAS  CON  RESULTADO  NEGATIVO 
1103  ANB-K-L: GOTOl 130 

1110  SN*24:IF  INHL/10!*Í  OP  IttT  tUf  1 91  “L/10  ThCn  1110 
1112  GOTO  1000 

me  ans-k*l:  ifint  <ans  /  10000»  >0thení0B0 
111*  GOTOl 130 
1120  SN*43 ] ANS«K  +  L 

1130  K0-STR01KÍ ! L0«STR*1L1 ¡Lí*-- E4SH|FTDI*;LJ0«* MSPCI-ÍHEN  REPRESENTAR  PROBLEMA  En  PANTALLA 
1140  R-6íC-ll:Z*-hr*:GOSLiír3000 
1 1 30  R«R  *  1 ! Z*«  L« : GOSUB  3000 

E  1  60  C-C-LEM  EL«  t  -  I  :  PP-0:  POKEFNL  i  1  024  t  .  6w:  POKEFnl  c 332*6  )  ,  CL 

1 1 70  R-R* I : 0- 1 I 1 Z*-L I *: OQSUB3000 

1 1 B0  R-R  + 1 : Z»-L J*i OOSUB3000 

I 1 *0  N»« 1 024  » 404  R  * C 

1200  2I“INTiT| / 1 00  i 

1210  GüSUB2ZI@ 

1220  IF21P-1THEN2000:REWT|EMPO  agotado 
1230  POKErtM. A5C CAZ0E :«H«NM- l 
1240  AP=VAL  EA20E 

1230  1FLEN(STR«1ANSMí3THEN1440 
1260  GDSUBZ21B! IFZIP-I THEN7000 
1263  I  f-  2  AP  -  L  7  HG  N  L  2  1 B 

1270  POKENM , ASC  í  A : MM»NM - 1 1 AP«AP* 104VAL  EAZ4J 
]280  IFLENÍSTR0CANS1 1 <4THENI440 
1  2*0  GL1&UB22I0;  IFZIP-1  THEN2000 
12*3  1F2AP-1THEN1240 

I 300  POKEmh , ASO  I AI* i  : HN- MM - 1 : AP« AP * 1 00*  UAL  i  A I*  f 

t  3  10  1  FLEN  í  S  TP*  1  ANS  s  K5THEN1440 

1320  GOSUB2ZI0: If 21 P« 1 THEN2000 

1323  |FIAP« 1 THEN1 2¥0 

1330  PDKEhh.AGC (AI*I 

1333  AP-AP* 1000+uñL « AZ*k 

¡440  ]  p  AP  -  4N5  T  he  NPR  INT1  E  2SPC  I  B1  EN-HASt  BPC  ]  ACERT  ABO 11  :  CA-CA*  lí  GOTOl  4*0 

I  430  PR INT* I 2SPC 1 NO - L A 1 SPC 3 RESPUCS T A í SPC >ESFí ANÍ 
14*0  FORDL-1TO750:BETL*:n£xTDL, II 

1300  PRINT " [CLfi  J ■ í  PR INT ' 1 5*C  3  NASÍ  SPC 1 ACEPTADO ‘ í  PR INT  MSPC 1 ' I C*¡  É  í SPO  í DE  CBPC 3  DIEZ  1GPC  ÍVÉCES' 
1303  IFCAC4THEME1AA4 

1310  □HCA-4GOTQ1330, 1=40, 1330. 13*0, 1370, 1380 

1320  PR1NT 

1321  PR INT ¡ PH1NT -  CEPO  J  ASEGURATE  f  SPC  J  GUE t  SPC  í COLOHUEE fSRC 1EL  E  SPC ] RUÑE ROI SPC 1 DONDE  [ 8P0 I F 
1323  PR INT ■ [ 2SPC 1 5£  t  SP CIE NCUENT RA 1 SPC 1 EL í  SPC 1S IMBOLOtSPC 1  DESTELLANTE ■ : GOTO  I 600 

1330  PR I  NT : PR1 NT  * [ SPC 10»- -  * : PRINT  *  I SPC  3 1 NTEnTR [ SPC 1ÜNOEE  SPC 3NAS 1  1  *  i GOTOl 600 
1940  PRINT IPRINT' t SPC  3ÍIEN-- * -PRINT' E28PC1 INTENTAISPCUIROSISPC  ÍNAS1  ‘ ;BOTO160é 
1330  PRINT; PP |NT "MUYE SPC IB ItN- - “ ; PR1 NT  * l SPC 1 INTENTA [ SPC J UNOS [ SPC 1 «AS  1  1  ';OOTQ1Í0 
1340  PRINT  í  PRINT*  f  BPC  I  EXCEL  ENTE  -  -  -  :  PR  INT*  f  SPC  I  INTENTA  [  SRC  )  UNOS  {  S  PC  1  ÑAS  1  1  V  SOTIJ10  0 
1370  FRI  NT  í  PRINT  "I  SPC  IFABLiLOSD--*:  PRINT  F  INTENTA!  SPC  lüNOSISPC  IMAS'  1  "  ¡GOTO  100 
I 3B0  PRINT! PRINT" EBPO JFANlAST ICO' ' ! : PRINT - INTEnTAE SPC ÍUNOE 1 SPC IRAS ' 1 *íOOTO100 
1  *00  PRI  NT  :  PRI  NT  -GUI  ERESE  SPC  ]  «AS’!  SPC  1  I  í-I  E6PC  30!  SPC  í»0  i  * 

1610  GE  T  D* ;  [ F  D*- 1  * THEN1 6 10 
1*20  IFD*«*S*THEN*00 
1630  END 

2G00  PRINT ' rSPC 1 T  ÍENPO  E  SPC I AGOTADO* 1 PR INT  FLAt  SPC IRESPUEST A( SPC 1  ERA* I ANS 

20  E  0  F CRN- 1 3 T Q0S TÉ P -  1  I POKEV , N; PU^EST ,  I2¥! POKE 5 1 , i  3 : P0KEB3, 40  E  P0KÍG4 , 200 ; NEXTN 

2020  PWE32.0  :  POKES  1 , 0  :  GOTOl  4*0 

22 I 0  2 I P« 0 : 2AP-#Í  GETAZ*: JF INT I T I / | 00  i  >Zl  *9#FTHEN223fl 
2213  KK'Mk* 1 ;  I F K K7  2* I  NT  I KK / 2 I THEWPO»EMM, 70:GOTDZ2Z0 
2217  PDtíEN»,  102 
2220  I F  AZ** - -THEN2210 

2222  IFAEC  IAZ4J  «136THENCL-CLM;  IFCL*4T»eMCL«CL*1  IRE»  CAMBIA  EL  COLOR 

2233  IFCH2DRCL  >8THENCL«1 

2234  RE»  BORRAR 

22ÍS  1P*SC  rAZR] «2*TH£NNK-MMf l : AP-AP- I0tt 1 3*3  - »»  t *  f  PEÉK i i  -  40 t ; ZAP* 1 eRÉTURN 

2230  IFABC1A24M4Q  OR  ASC  i  AZ*>  >37THEN2Z  10 

2240  RETURN 

2Z3fl  n  P« 1 í  RETURN 

3G00  F  okpp«0TOLé.n  i  7*  i  -  i:  PQkEFNl  I  10241  ,  ASC  INI  D«  i  Z»,  LSN  e  Z*  i  -PP.  U  i 
3010  POKEFNL  '  33 2*6  J  ■  CL  1  NE.XTPP  :  HETUftN 
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Disfruta  mucho  más 

con  la  magia  de  la  conversión 

(y  un  juego  de  demostración) 


Te  sientes  marginado  por¬ 
que  tienes  un  Cornmo- 
dore  64,  y  dispones  de  poco 
software?  En  este  artículo  te 
indican  la  forma  de  convertir 
los  numerosos  programas  del 
VIC-20  para  que  se  procesen 
en  el  C-64. 


Al  principio  mi  interés  en  convenir 
programas  fue  provocado  por  la  esca¬ 
sez  de  programas  para  el  Commodore 
64  y  la  facilidad  con  que  se  podían 
conseguir  para  el  VIC-20.  Un  motivo 
secundario  fue  que  me  proporcionaba 
la  oportunidad  para  comprender 
mejor  el  lenguaje  Basic  y  para  estu¬ 
diar  las  técnicas  de  programación  que 
se  utilizan  en  la  animación.  Cual¬ 
quiera  que  sea  el  motivo,  primero  hay 
que  elegir  un  programa  para  convertir. 

Naturalmente,  la  mejor  forma  de 
elegir  un  programa  es  verlo  funcionar 
en  un  VIC-20.  Aunque  esto  no  sea 
siempre  posible,  una  vez  elegido  el 
programa,  éste  tiene  que  introducirse 
en  el  C-64  exactamente  igual  que  apa¬ 
rece  en  el  listado,  y  se  tiene  que  salvar 
antes  de  ser  procesado. 

Este  es  el  programa  inicial.  Si  se 
puede  comprobar  en  un  VIC,  mucho 


mejor  y  si  se  detecta  algún  fallo 
resulta  útil  apuntar  el  número  de  la 
sentencia.  Es  probable  que  los  mis¬ 
mos  fallos  salgan  en  el  C-64, 

Las  Principales  Diferencias  de 
Programa 

El  VIC-20  y  el  C-64  se  parecen  en 
muchos  aspectos,  pero  existen  dife¬ 
rencias  en  los  métodos  que  emplean 
para  controlar  los  registros  utilizados 
para  producir  la  acción  en  La  pantalla 
y  en  el  sonido.  Los  procedimientos  de 
lectura  de]  teclado  y  del  joysiick  tam¬ 
bién  son  diferentes.  (Las  Tablas  1  y  2 
presentan  un  resumen). 

Las  semencias  'Trini"  o  "Poke” 
controlan  los  caracteres  de  la  pantalla 
y  los  colores  de  los  caracteres.  Las 
sentencias  'Trini"  en  un  V1C  se  pue¬ 
den  imprimir  en  la  pantalla  de  un  C- 
64,  realizando  unas  modificaciones 
mínimas  dada  la  diferencia  del  tamaño 
de  la  pantalla.  Normalmente,  un 
cambio  es  necesario  si  una  sentencia 
"Print'"  termina  en  pumo  y  coma,  ya 
que  se  escribe  de  forma  diferente  en  la 
pantalla  más  ancha  del  C-64. 

Las  sentencias  'Toke”  siempre  se 
tienen  que  modificar  para  que  se 
ajuste  la  posición  de  memoria  del  VIC 
a  la  posición  equivalente  en  el  C-64r 
Yo  he  inventado  un  programa  sencillo 
(El  Listado  1)  que  convierte  la  posi- 


Si  tiene  un  C-64 
pero  no  suficientes  programas 
puedes  coger  algunos 
del  VIC 

y  diviértete  convirtiéndolos 


Listado  I. 


10PP  PS  [NT  1  f  CLP  ]  *  i  FE M**# #C A M fi  ID  ÜE  DIRECCIONES  D£  PANTALLA  DEL  VIC  II  AL  C-á4 
iat  B  FGKE3323  I  .  J¡  ¡  FLA6-0  :  VA-0  :  INPUT  '■(  SPC  3  P  1  R^E C C  1 ON T  SPC  I V 1 C  E  EPC  í  20  4  i  VA  :  IFVA-ÉThS 
N5TDP 

Jll  I  IFUA4  7*B0TH£NPRINT«  E RVSÜN 3 D IRECCIÜNE 6FC 3 DÉHAS I APOE SFC  1BAJ  A  *  I  OOTO  I  01 9 
1012  I  FUA  05ANDVA<  3SHI 00  THENPíi  í  NT  *  É  RvüON  ]  L  XRECC  ION{  SPC  J  NOÍ  SFC  I  VAL  I  DA  '  í  QG  f  D  l  f-lfl 
1010  IFVAÍ3S903.THÉNPP  1  NT  -  E  RUSON  3  0 IHECC  I  ONÍ  SFC  3  DEMAS  1  A  DO  E  5JPC  1  AL  T  A  “  í  GOTO  LIJ  « 

¡013  IFVA  VA«DVA< 3S*Í éTMEMUA-UA- 72»: FLAO-1 

1OZ0  fiO»|NT [ 

¡030  CO-VA-T*i3B-22*RO 

1P40  CA-EOZA*1íO*40*C:Ci:  TFFLAG-  lTHtNCA-CA*347T’? 

1  P30  PRlNTTABi?!  }  CHH*  t  lli  1  1*01  AfC  C  1  EIN  t  SPC  IC (CAMiOTDlfll* 
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ción  de  caracteres  en  el  VIC  en  la 
posición  para  el  064,  Se  puede 
determinar  la  posición  del  carácter 
“Poke”  en  color  añadiendo  un  “off¬ 
set”  a  la  posición  dd  carácter.  El 
“offset”  para  el  VIC  es  30720  y  el 
“offset”  para  el  C-64  es  54272, 

En  el  VIC  un  sólo  registro  controla 
los  colores  del  borde  y  el  fondo  de  la 
pantalla,  mientras  en  el  C-64  se 
emplean  dos  registros  para  controlar 
los  colores.  El  formato  de  la  sucesión 
de  los  colores  de  los  “Poke”  utilizado 
por  el  VIC  es  el  más  complicado.  El 
valor  más  bajo  de  “Poke”  es  8  y 
representa  un  fondo  negro  con  un 
borde  negro. 

A  medida  que  este  valor  se  incre¬ 
menta  por  uno,  el  color  dd  borde  se 
incrementa  por  uno  en  el  orden  de  la 
clave  de  color  en  el  teclado  (de  negro 
a  amarillo).  Para  aumentar  el  color 
del  fondo  por  uno  (en  el  orden  presen¬ 
tado  en  la  Tabla  1),  se  necesita  un 
incremento  de  16.  Por  ejemplo,  24 
produce  un  borde  negro  con  un  fondo 
blanco;  el  “Poke”  más  alto,  255,  pro¬ 
duce  un  fondo  de  amarillo  claro  y  un 
borde  amarillo. 

Dado  que  los  códigos  de  color 
“Poke”  en  el  C-64  son  constantes  (0- 
15),  el  efecto  producido  se  ve  en 
seguida  que  se  hace  un  “Poke”  cada 
número  de  color  en  los  dos  registros. 
Cuando  se  hace  un  “Poke”  cero  en  el 
registro  dd  borde  en  el  C-64,  aparece 
un  borde  negro. 

El  VIC- 20  y  el  C-64  también  pro¬ 
ducen  el  sonido  de  dos  maneras  dife¬ 
rentes,  El  VIC  tiene  cuatro  registros 
dedicados  al  sonido.  Tres  de  las  voces 
son  musicales,  cada  una  con  un 
determinado  alcance  de  frecuencias, 
mientras  que  la  cuarta  produce  ruido 
al  azar.  Las  voces  dd  VIC  pueden 
estar  en  “on"  o  en  y  se  contro¬ 

lan  especialmente  por  las  posiciones 
dd  volumen  y  de  la  frecuencia  (128- 
255), 

El  C-64  posee  un  simetizador  de 
sonido  de  tres  voces.  Cada  voz  es 
capaz  de  producir  ruidos  y  música.  El 
sonido  exacto  que  se  produce  se  con¬ 
trola  mediante  las  posiciones  de 
volumen,  frecuencia,  forma  de  ondas, 
principio/ final  y  mantener  la  tecla 
pulsada/soltar  la  tecla.  El  grado  de 
control  alcanza  ble  sobrepasa  el  que  se 
necesita  para  La  mayoría  de  los  juegos 
o  programas. 

Diferencias  de  Entrada 

Físicamente  los  teclados  de  los  dos 
ordenadores  son  idénticos,  pero  al 
pulsar  una  tecla  determinada,  los 


registros  que  almacenan  la  informa¬ 
ción  (posiciones  197-203)  contienen 
distintos  valores.  Dado  que  la  mayo¬ 
ría  de  los  programas  leen  el  teclado,  se 
necesitan  unos  cambios  de  programa 
para  producir  el  efecto  deseado.  Es 
muy  fácil  cambiar  la  sentencia  “If” 
que  se  utiliza  para  detectar  la  pulsa¬ 
ción  de  una  tecla  determinada.  Los 
valores  para  las  teclas  utilizados  nor¬ 
malmente  en  el  VIC  y  el  C-64  se  pre¬ 
sentan  en  la  Tabla  2. 

Se  aprecian  mejor  las  diferencias  en 
las  técnicas  de  lectura  para  el  mando 
(joystick)  en  las  dos  máquinas  si  se 


consideran  unos  ejemplos  típicos  de  la 
aplicación  de  programas.  Uno  de 
estos  ejemplos  es  “Dr.  Dementia”,  un 
programa  que  yo  convertí  y  que  se 
publicó  en  “Microcomputing”  en 
agosto  de  1983. 

Este  programa  utiliza  el  mando 
(joystick)  principalmente  como  un 
“paddle’\  desplazándose  solamente  a 


Disposición  de  caracteres  de  pantalla: 

VIC  22  columnas  X  23  filas 

C-24  40  columnas  X  25  filas 
Fondo  de  pantalla  y  controles: 

VIC  Dieciséis  (negro,  blanco,  rojo,  cyan,  morado,  verde,  azul,  ama¬ 
rillo,  naranja,  naranja  claro,  rosa,  cyan  claro,  morado  claro, 
verde  claro,  azul  claro,  amarillo  claro) 

Control  36879  (8-255) 

C-24  Dieciséis  (negro  a  naranja,  marrón,  rojo  claro,  gris  1,  gris  2, 
verde  claro,  azul  claro,  gris  3) 

Control  53281  (0-15) 

Color  de  caracteres  y  borde  y  controles: 

VIC  Ocho  (negro  a  amarillo) 

Control  de  borde  36879  (8-255) 

C-64  Dieciséis  (todos  colores  de  borde  y  fondo) 

Control  de  borde  53280  (0-15) 

Mapas  de  caracteres  de  pantalla  y  memoria  de  colores  (empezando  en  la 
posición  de  pantalla  en  la  parte  superior  a  la  izquierda); 

VIC  Carácter  7680-8185 
Color  38400-38905 
Carácter  “offset"  a  color  30720 

C-64  Carácter  1024-2023 
Color  55296-56295 
Carácter  “offset”  a  color  54272 

Chip  generador  de  sonido  y  controles: 

VIC  Tres  voces  musicales  (Alcance  total  de  cinco  octavos:  interior 
36874,  mediano  36875,  superior  36876) 

Una  voz.  de  ruido  al  azar  36877 
Control  de  volumen  36878 

C-64  Tres  voces  (Alcance  total  de  ocho  octavos) 

Controles:  volumen,  frecuencia,  forma  de  ondas,  principio/fi- 
nal,  mantener  pulsada/soltar  la  tecla. 

Disposición  de  teclado  (Vea  la  Tabla  2  para  comparar) 

Tabla  L  Principales  diferencias  entre  los  ordenadores  VIC-20  y  Contmo - 
clore  64 


Comíiuidore  World  Marzo  1984/1 1 


DISFRUTA  MUCHO  MAS 

con  la  magia  de  la  conversión 


la  izquierda  y  a  la  derecha.  Se  puede 
utilizar  una  programación  semejante 
para  obtener  movimiento  en  cual¬ 
quiera  de  las  ocho  direcciones.  Las 
sentencias  de  programa  original  del 
V1C  y  el  programa  convertido  del  C- 
64  se  presentan  a  continuación: 

VI C  PGKE  37154,127;  Pk=PEEfc(37t52) 
AND  \2ü:  JQ=_ (PIOO):  PQKF 
37154,255:  PK=PEEKí37l5I):  J2= 

— (( PK  AND  I6y=0):  fb=  — Í(PK 
AND  32>-0) 

C-64  JV-PFLKÍ 56320)  AND  15:  FB= 

— ({PI.FKUW20)AND  L6K>) 

El  primer  “Poke*1  del  ViC  fija  uno 
de  los  dos  registros  de  la  dirección  de 
datos  en  la  modalidad  de  entrada. 
Esto  permite  la  lectura  del  interruptor 
3  (derecha)  del  mando  (joystíck)  y  se 
analiza  una  función  lógica  “AND” 
para  establecer  un  valor  para  PX.  Si  el 
mando  (joystiek)  se  desplaza  a  la 
derecha,  JO  se  fijaría  en  uno  mediante 
la  sentencia  lógica  AND.  Si  el  joystiek 
estuviera  estacionario,  JO  sería  cero. 


Dado  que  el  registro  de  la  dirección 
de  datos  tiene  dos  funciones  en  el 
VIC,  se  tiene  que  restaurar  o  hacerle 
un  POKE  a  255  después  de  completar 
la  lectura  del  interruptor  3.  Los  otros 
tres  interruptores  del  mando  (joys- 
tick)  se  leen  haciendo  un  PEEK  en  la 
posición  3715L  Se  determina  el 
estado  de  los  interruptores  realizando 
la  función  lógica  “AND”  en  el  valor 
leído  por  las  potencias  de  2.  Sí  se 
realiza  la  función  lógica  “AND”  en 
PEEK  con  4  se  detecta  el  interruptor 
que  se  desplaza  hacia  arriba.  De 
modo  semejante,  si  se  realiza  la  fun¬ 
ción  lógica  AND  con  el  8  y  16,  se 
detectan  las  direcciones  hacia  abajo  y 
a  la  izquierda,  respectivamente. 

El  movimiento  en  diagonal  se 
detecta  cuando  dos  interruptores  se 
cierran  a  la  vez.  Se  detecta  el  movi¬ 
miento  del  botón  de  disparo  mediante 
la  realización  de  la  función  lógica 
AND  con  128.  Las  sentencias  lógicas 


para  J2  y  FB  son  ejemplos  de  la 
detección  de  la  dirección  a  la  izquierda 
y  el  botón  de  disparo.  El  VIC  dispone 
de  otros  registros  para  leer  el  mando, 
pero  los  que  se  presentan  aquí  son  los 
que  se  utilizan  normalmente.  Los 
registros  alternativos  son  37137  v 
37139. 

El  joystiek  del  C-64  se  lee  simple¬ 
mente  haciendo  un  “PEEK"  en  una 
de  las  dos  posiciones  (56320  para  la 
Puerta  2:  56321  para  la  Puerta  I  ).  El 
valor  donde  se  ha  hecho  el  PEEK  da 
14,  13,  11  y  7  para  el  movimiento  del 
joystiek  hacia  arriba,  hacia  abajo  a  la 
derecha  y  a  la  izquierda,  respectiva¬ 
mente  cuando  se  realiza  la  función 
lógica  “AND”  con  15.  El  movimiento 
del  mando  (joystiek)  en  diagonal  pro¬ 
duce  valores  de  5,  6,  9  y  10.  El  botón 
de  disparo  se  detecta  realizando  la 
función  lógica  “AND”  del  PEEK 
con  16. 

El  procedimiento  general  para  mo¬ 
dificar  una  porción  del  programa  del 
mando  en  el  VIC  para  que  funcione 
en  el  C-64  es  la  que  se  presenta  a  con¬ 
tinuación: 

— Explorar  el  listado  para  los  regis¬ 
tros  mencionados  y  el  valor  que  utili¬ 
zan  para  “AND”. 

—Fijar  la  lógica  del  programa  que 
utiliza  la  entrada  del  mando  (joystiek). 

— Modificar  las  sentencias  VIC  a 
Jas  simples  sentencias  equivalentes  en 
el  C-64, 

Una  demostración  de  Prueba 

La  mejor  forma  de  saber  la  manera 
en  que  todas  estas  diferencias  afectan 
un  programa  típico  es  realizando  un 
ejercicio  de  conversión.  Para  este  ejer¬ 
cicio,  he  elegido  un  juego  de  “Public 
Domain“,  “Artillcry"  (Artillería),  es¬ 
cogido  porque  las  modificaciones  de 
conversión  son  típicas  de  la  mayoría 
de  los  programas  sencillos  de  Basic. 
Los  Listados  2  y  3  presentan  el  pro¬ 
grama  original  de  VIC  y  el  programa 
convertido  del  C-64.  El  derecho  para 
utilizar  este  juego  fue  otorgado  por 
Bill  Munch  de  Public  Domain,  lnc., 
West  Millón,  Ohio. 

El  método  utilizado  proporciona 
un  programa  del  C-64  que  funciona 
de  modo  semejante  que  el  programa 
del  VIC.  Sin  embargo,  el  uso  del  pro¬ 
cedimiento  detallado  no  produce  en  el 
C-64  SID  (Sound  Interface  Devíce) 
(Dispositivo  de  Sonido  de  la  Inter- 
face)  exactamente  los  mismos  sonidos 
que  los  que  se  producen  en  el  VIC.  Si 
se  desea  mayor  fidelidad,  los  registros 
SID  tienen  que  ser  ajustados,  que  a  su 
vez  significa  ajustar  los  controles  de 


TECLAS  STANDARD 


FILA  1  FILA  2  FILA  3  FILA  4 


Tecla  VIC 

C-64 

Tecla  VIC 

C-64 

Teda 

VIC 

C-64 

_ , 

8 

57 

Q 

48 

62 

A 

17 

10 

z 

33 

12 

1 

0 

56 

w 

9 

9 

S 

41 

13 
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26 

23 

2 

56 

59 

E 

48 

14 
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18 

18 

c 

34 

20 

3 

1 

8 

R 

10 

17 

F 

42 

21 

V 

27 

31 

4 

57 

11 

T 

50 

22 

G 

19 

26 

B 

35 

28 

5 

2 

16 
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11 

25 
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43 

29 
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28 

39 

6 

58 

19 
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51 

30 

J 

20 

34 

M 

36 

36 

■  7 

3 

24 
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12 

33 

K 

44 

37 

, 

29 

47 

8 

59 

27 

O 

52 

38 
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21 

42 

37 

44 

9 

4 

22 

P 

13 

41 

45 

45 

/ 

30 

55 

0 

30 

35 

53 

46 

22 

50 

+ 

5 

40 

* 

14 

49 

= 

46 

53 

- — . 

61 

43 

54 

54 

£ 

6 

48 

Tecla 

Teclas  de  Función  y  Control  Especial 

VIC  C-64  Tecla 

VIC 

C-64 

Clear— Home 

62 

51 

n 

39 

4 

Inserí — Delete 

62 

0 

f3 

47 

5 

Return 

15 

I 

rs 

55 

6 

Space  Bar 

32 

ó 

n 

63 

3 

Cu  rsor —  Verdea  1  3 1 

7 

Cursor— Horizontal 

23 

2 

Nota:  Cuando  no  hay  teclas  pulsadas  las  posiciones  de  memoria  1 97  y  203 
contienen  64, 

Tabla  2.  Diferencias  del  teclado  del  VIC-20  y  el  C-64. 
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frecuencia,  forma  de  ondas,  princi- 
pio/fmal  y  mantener  pulsada/soltar 
teda. 

Lo  difícil  de  la  conversión  es  seguir 
el  flujo  del  programa.  Como  los  pro¬ 
gramadores  del  VIC  disponen  de  una 
memoria  de  máquina  muy  limitada 
utilizan  pocas  semencias  “Remark”. 
Una  manera  de  rastreo  es  colocando 
un  “Stop”  antes  y  después  de  cada 
sentencia  de  bifurcación  (lf,  Go  Sub, 
Go  To,  etc.)  en  el  programa  inicial. 
Luego  se  modifican  las  sentencias 
antes  del  “Stop”  y  se  retiran  a  medida 
que  cada  división  pasa  sin  problemas 
obteniendo  el  proceso  del  programa. 

En  “Artillería”  dos  jugadores  dis¬ 
paran  cañones  por  encima  de  una 
montaña  que  cambia  de  forma  al 
azar.  Para  que  el  juego  resulte  más 
complicado  hay  que  tener  en  cuenta  el 
factor  del  viento  al  elegir  el  ángulo  de 
disparo  del  cañón.  También  hay  que 
ajustar  la  carga,  o  la  pólvora. 

Las  líneas  o  sentencias  del  listado 
del  C-64  que  se  modifican  serán  tra¬ 
tadas  por  grupo  a  medida  que  surjan 
cambios  comunes  de  sonido,  pantalla, 
teclado,  etc. 

Líneas  0  y  75:  La  función  DBF  en 
la  linea  0  se  utiliza  a  lo  largo  del  pro¬ 
grama  para  hacer  un  “Poke”  de 
varios  símbolos  gráficos  en  las  posi¬ 
ciones  de  la  memoria  de  pantalla, 
según  los  valores  actuales  de  X  e  Y. 
Esta  función  DLI  también  podría 
haber  sido  utilizada  por  el  programa¬ 
dor  del  VIC  en  la  línea  75,  pero  no  se 
hizo  así.  Las  diferencias  de  la  ecua¬ 
ción  en  ambas  líneas  se  relacionan  al 
comienzo  de  la  memoria  de  caracteres 
de  la  pantalla  (VIC,  7680;  C-64,  1024) 
y  al  número  de  filas  y  columnas  (VIC, 
22  columnas  X  23  filas;  C-64,  40 
columnas  X  25  filas). 

Línea  4:  Esta  subrutina  inicial 
(líneas  3500—3640)  trata,  en  princi¬ 
pio,  con  los  registros  de  teclas  y  los 
“array”.  La  primera  línea  establece 
los  límites  de  memoria  de  los  registros 
SID  e  inicia  liza  tres  variables  (BO, 
BA,  CU)  para  controlar  los  colores  de 
pantalla  para  el  borde,  el  fondo  y  el 
cursor.  La  siguiente  línea  borra  el 
chip  generador  de  sonido,  SID,  según 
las  recomendaciones  de  Commodore. 

El  programa  inicia  el  estableci¬ 
miento  de  variables  que  se  utilizan 
para  seguir  la  pista  de  ¡os  registros  de 
tedas  SID;  a  continuación  iniciativa 
las  dos  voces  SID  utilizadas  en  el  pro¬ 
grama.  Las  voces  I  y  2  imitan  las 
voces  de  música  y  ruidos  dd  VIC.  La 
voz  3  se  inícializa  pero  no  se  utiliza  en 
el  programa. 


Para  la  mayoría  de  los  programas 
se  pueden  utilizar  valores  fijos  para 
principio/final  (AD),  mantener  pul¬ 
sada/soltar  la  tecla  (SR),  y  de  baja 
frecuencia  (LF).  Vo  utilizo  el  comando 
“Poke”  estandard,  y  lo  modifico 
solamente  si  la  calidad  del  sonido  es 
pobre.  Finalmente,  La  subrutina  fija  el 
ángulo  inicia!  y  los  valores  de  pólvora 
para  cada  jugador. 

Línea  5:  Los  comandos  “Pnke”  dd 
C-64  desempeñan  las  mismas  funcio¬ 
nes  que  los  “Poke”  del  VIC;  fijan  los 
colores  deseados  para  el  borde  y  el 
fondo  de  la  pantalla  y  para  el  cursor. 
Como  hemos  mencionado  antes,  en  el 
VIC  d  valor  almacenado  en  la  posi¬ 
ción  36879  controla  los  colores  dd 
borde  y  el  fondo. 

En  el  VIC,  los  comandos  “Poke” 
producen  los  colores  blanco,  blanco  y 
azul  para  el  borde,  fondo  y  cursor. 
Los  colores  del  C-64  son  blanco, 
blanco  y  gris  I, 

En  la  versión  dd  C-64,  KX  se  fija 
en  65272.  Esto  es  el  “offset”  entre  las 
posiciones  de  los  caracteres  y  la 
memoria  de  la  pantalla  en  color.  $e 


utilizará  más  adelante  en  el  programa 
y  se  necesita  para  mantener  la  estruc¬ 
tura  del  programa. 

A  veces,  es  necesario  abreviar  las 
palabras  clave  y  añadir  variables  o 
sentencias  para  reducir  las  sentencias 
dd  VIC  (longitud  máxima  de  88 
caracteres)  para  que  quepan  en  el  C- 
64  (longitud  máxima  de  80  caracteres). 

Línea  7:  Esta  sub  rutina  mejorada 
(las  líneas  4,000-4.100)  escribe  las  ins¬ 
trucciones  de  juego  en  la  pantalla. 
Retorna  a  la  sentencia  7  cuando  el 
“Peek”  o  el  valor  almacenado  en  la 
posición  197  (ai  pulsar  una  tecla)  se 
fija  en  60.  Esto  ocurre  cuando  se  pulsa 
la  barra  de  espaciado. 

Línea  I  i:  Se  realizan  mejoras  en  la 
versión  dd  C-64  para  fijar  los  valores 
actuales  de  ángulo  (A)  y  pólvora  (V)a 
ios  valores  antes  seleccionados  por  el 
jugador  1  ó  2.  Los  parámetros  actúa- 


VIC  Address 

Función 

C-64  Address 

197  ó  203 

Teda  pulsada 

197  ó  203 

646 

Color  del  cursor 

646 

7680 — 8185 

Posición  de  memoria  de 
caracteres  de  pantalla 

1024—2023 

36874-36878 

Registro  de  sonido 

54272—54296 

36879 

Registro  de  color  de 
pantalla  (fondo  y  borde) 

53280  y  53281 

37137 

Registro  de  salida 
alternativa  dd  mando 
(joystick) 

37139 

Registro  de  dirección  de 
datos  alternativa  del 
mando  (joystick) 

37151 

Registro  de  salida  principal 
del  mando  (joystick)  para 
interruptores  0,  1  y  2 

56320  y  5632 1 
(all  switehes) 

37152 

Registro  de  salida  principal 
del  mando  (joystick)  para 
interruptor  3  (derecha) 

37154 

Registro  de  dirección  de 
datos  principal  del  mando 
(joystick) 

38400—38905 

Posiciones  de  memoria  de 
color  de  caracteres  de 
pantalla 

55296—56295 

Tabla  3.  Direcciones  importantes  del  VIC- 20  y  las  equivalencias  en  el  C-64. 
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DISFRUTA  MUCHO  MAS 
con  la  magia  de  la  conversión 


les  se  salvan  en  la  sentencia  27  y  se 
inicializan  en  la  sentencia  3630. 

Línea  13:  Se  necesita  el  “Poke"  adi¬ 
cional  en  el  programa  del  C-64  para 
que  el  cursor  vuelva  al  color  de  gris  1 
después  de  que  las  montañas  y  los 
cañones  se  imprimen  en  la  subrutina 
3200, 

Líneas  14,  15,  18,  19  y  24:  Estas 
lineas  se  tienen  que  modificar  dadas 
las  diferencias  en  los  teclados.  Un 
“Peek"  de  la  posición  197  ó  203 
retorna  valores  diferentes  en  los  dos 
ordenadores  cuando  se  pulsa  la 
misma  tecla.  La  Tabla  2  compara 
estos  valores. 

Línea  24:  En  la  versión  del  C-64,  se 
elimina  el  “Poke"  de  sonido  equiva¬ 
lente  al  del  VI C.  El  Poke  del  VIC  sube 
el  volumen  al  máximo,  15.  Si  este 
“Poke"  no  se  eliminara,  el  SID  emiti¬ 
ría  un  ruido  seco  y  repetitivo.  Se 
retrasa  la  conversión  del  ángulo  de 
disparo  elegido  en  radianes  hasta  que 
se  salva  como  AS(PL)  en  la  senten¬ 
cia  27. 

Líneas  25,  26,  65,  67,  81,  120,  200!, 
2003*  2060,  2070,  2076  y  2078:  Los 
“Poke^1  de  sonido  del  VIC  en  estas 
sentencias  se  modificaron  para  repro¬ 
ducir  la  música  o  sonidos  equivalen¬ 
tes,  Para  que  el  procedimiento  de 
conversión  resultara  fácil,  decidí  fijar 
la  mayoría  de  los  registros  SID  en  la 
sub rutina  3500;  sin  embargo,  se  tienen 
que  controlar  un  mínimo  de  tres.  Esto 
es  un  registro  más  que  los  que  se  nece¬ 
sitan  en  el  VIC, 

Los  registros  para  el  C-64  son  VL 
(volumen),  HF  (alta  frecuencia)  y  WF 
(forma  de  ondas).  Los  registros  del 
VIC  son  volumen  (36878)  y  frecuen¬ 
cia,  o  voz,  (36874-36877),  Los  regis¬ 
tros  de  volumen  de  ambos  ordenado¬ 
res  se  manejan  de  forma  idéntica, 
pero  los  registros  de  frecuencia  tienen 
diferentes  alcances  de  “Pokc".  Se 
puede  hacer  un  “Poke"  en  los  regis¬ 
tros  del  VIC  con  valores  de  entre  128 
y  255,  mientras  que  el  alcance  del  C- 
64,  de  0  a  255,  es  el  doble  de  grande. 

Los  registros  de  forma  de  ondas  del 
C-64  se  utilizan  para  seleccionar  el 
tipo  de  sonido  producido  v  para  apa¬ 
garlo  y  encenderlo.  Yo  fijé  la  voz  1 
para  ruido  y  la  voz  2  para  música.  La 
forma  de  onda  para  la  voz  L  WF(1), 
contiene  o  129  (ruido  encendido)  o 
128  (ruido  apagado).  De  modo  seme¬ 
jante,  el  registro  de  forma  de  ondas  de 
la  voz  2  contiene  o  17  (música  encen¬ 
dida)  o  16  (música  apagada). 

Los  registros  de  frecuencia  de  VIC 
controlan  el  tipo  de  sonido  produ¬ 
cido.  Los  tres  primeros  registros  (el 
registro  más  bajo  es  la  voz  del  octavo 
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El  Listado  2.  Programa  origina I  “  Artillería”  para  el  V1C-20.  Este  listado  no 
funciona  en  un  VIC-20  no  ampliado  a  no  ser  que  se  quiten  las  sentencias  REM. 

Artillería  VIC  20. 

■  CLS:  DFFFNCL  INT  £ ZZ. 3- Y  I *2Z+X: X-RND  £  -  T  I  1  :PL*1 

L  FEH+ESTO  ES  ARTILLERIA  Zfl  PROGRAMA  Qfi I G I  RAÍ.  GE  '  PUBLIC  DOHAIRr*  VER  COMENTARIO 
B 

3  PRlNT-tCLftí- £ POk£360?í. 23 

9  GO5DB300B£ W-  ÍZ4RN0  i  i  I  J  £  W-tf C 2  £ R- 1 Nt  <2#RhG(  1  I  *1  >:  IFR-i  ThENV-- 

íg  g-p. r;h*.  84¡  t-b:  vx-e:  vy-4:  *-i :  * -e 

1  1  R<*  1  NT  <2*R«D(  11*13  i  LP»0  S  A- 431  V-Z0£  I  FFL-ZTHÉNLF-l  i 

1 2  RR-  i PNp I  3  M  : R > I N T (  7  +  RHD (13*11!  1 F RR } . 2THENRH» . 2 

13  GO8UB32B0 

14  IFPEEK L IP7J -3RTHENA-fl*í 

13  IFPEEK  (  1P7J  *47ThfENA*A  1 

14  I FAí  07 HE NA *0 
17  JF A- 90 [HENA-PÍ 
la  IFPEEK  U9’] 

19  IFPEEK í 1971 -A3TNENV-V- I 

20  1E'V<  ITHÉMV-I 

21  IFV540THENV-40 

22  PRINT - E  HOM 1 'SPC ¡LR*B3  ■ í  2SPt 1 - £ P« InT  *  E MORI *SPC  tLP]  ‘AMCULOt  SPC l-f  3SPC 1 í 3CR6RL 3  - 
A 

23  PRIMT- [ HOK1 [ C«SPD  ? -SPC <LP+B3  * I2EPC 1 " SPRINT ‘EHONi [ CRSRGl 'BPC  <L!M  -POL VORA-Í  3S*t 
1 1 3  C  RSRL J " V 

24  IFPEEK £ 1*7] - |3THCNA-*i/ | B**A : Püh E  36B?B ,  1 5 : 0OTÜ37 
2*1  POKE  3 6  B ?B  ,  wH í  P0«E  36&  77,  US  í  GOTO  :  4 

3?  POKE  36B??, B ! FRl  NT " C  NON I í  445PC 1 p 
38  PR I HT  *  t  MQM  1 1  ¡2C  fi  SRD  1  E  Z  ZS  P  C  1  * 

3*  OhrPLGaiO40.  50 

40  K-X|  :  Y-Y|  *1  :  K|-X;  V|  *V:PC-FNC¡L  £03  !  S*  1  :  GOTD40 

50  S--i : x-x2: t-yj+1 :xi-x; ti-vrPC-FNCL l03 

60  VT-SINEA)#V:VX-&4<CÜ£iA3*VS  :  FOR  I  -  220TO  I  68STEF  -  1 1  POKE  3*fl  7  7  ,  1  :  NEKT  S  POK £36*77  ,  V 
70  t-t+h:x-xi *vx6T-w6T  r2:  r-Yi+VY*T  -gat tí 
75  PK*74B0. 5* INT (22. 3-T 3 422  +  X £ Pk- |nT (Pío  i  PQkEPC, 32 
B0  1 FY  >22 THE Ni  15 

01  1 F  X  <  00  R  x J  2 1  THE  MPDkE  Z a  6 74,03  DO  T □  2004 

51  PÍ-PK: EF Y<*THENZ000 

90  IFPEEK £PK3 c  i 3?THEN I 008 

|j  t  POkEPk  >38720,  ÜPOKEPk,  46 

1 13  Ify*2+ 137-  > 233Qflr*2+ l 37c  0  HfMia 

120  POKE 340? o, y#2* 137 

130  IFY>BTHÉN?0 

140  GOTDZ000 

3  000  IFPEEK  ÍPH)  -Z33DRP6EK  <PK  -  22> -ZSSThENPOKépk  ,  42  ;  h| -m  *  í  :  00102060 

I 1 10  IFPEEK  £PK  >  «2Z30RPEEK  (PK.-2ZJ -2Z3THÉNP0KEPK . 42: HJ-H2+ 1 ; M- 1 ; PL-I ! 0OTO20A0 
3000  KK-PEEK  (PK)  IPOKEPK,  321  1  -SIN  (  I  I  I  PQKEPK  ,  XK 1  PEJKEP  K  ,  32í  1-BlNl  I  I  ;  PtJKÉPK.fch 
200  3  PBKE3AB76, 8: FORI -1 TO50 : POKE 340? 7 ,  a  ZB ♦ I ; NEXT 

2002  PQKEPK, 32 l I-S1MÍ I J : POKEPk , Kh : PQkEPK , 32 : I «SIN ti» : PQKEPk ,KX 
2BÍJ  FOftl-JI  TO30£  P0KE3697?.  1  70  -  1  !  NE  x  T  :  POK  E  3  60  77 , 0 

Z004  IFPL-J  THEHPL-ZÍ 6OTDZ010 

2003  I FPL - 2  THE  WPl  * 1 : QÜ TO20 ] 0 

2010  IFH- i TkENm-0 ; PR1 RT * ( CL  R I  * ; 0OTO^ 

2020  OOTO10 

2060  K-30720;PC3KÉ36G76.0^  O-?  í  £0-36077;  FÜRÍ  -  3  TOl  B 
29-0  POKEPK+K  ,6:  POKE.S0  ,  I  20  i  &-D1N  I  J  >  i  POKEPK  -  22  *  k  ,  G 
20 72  POKEPK - 43*K . □ : POKED0, 1 5B ! POKEPK - 4S*h , & 

2074  POKE»,  lee:  S-S1N  t  I  3  Ift-SlNI  í  3  í  1F  Q-4  2ThCnG-32í  MTO2070 
2*77  G-421K-B 

207 B  REKT I ÍPOKÉS0.  3  26£  F0R1 - 1 TOl Si ! HEx T : PQKE&0, 0: GOTO2004 
20B7  G-42IK-0 

3000  PPINTpIHHDHlí  2CR8RDJ  [  R  v  S  Ü  N  ]  I  RE  D  }  SC  ■  *  M 1  ■  E  HDH  J  EZCHSRD1I  1  1CRDRP  3  EPURIBC-'HZ 
3003  H-INT  I  6#RMÜ  ll  3  *1  J  !FORY-0TOR  'I  í  F DRX- 0T 03  ;  PtJKÉF RCL  L0I  *30720,3 
3085  POKEPHCL £0) ,2Z4!H£KTX; REXTY 

3007  ri-YlKl-INTI4tRHIM  1  I  *ia  i  X-Xl  i  POKEFNCL  !  J  I  *30720,  Ti  PQKEFN-Ct  10  i  ,  223 
3010  F0«Y -0TO3iFCWX*¿TOl 3! POKEFNCL  <03  *38720,3 

3020  P0KEFNC1.  (03,1  60  l  MEXTXJ  RE  X  T  T  I  R  - 1  NT  1  4PRN  0(13*13  .  FíjRt-0  ÍOR  -  I  i  K  0#tx-  |  6T02I 
3030  PDKEFNCL  i  * !  *30720 , 3 1 POKEFNCL  <03  , 224  £  NÉKTXl NCxTY 

3035  Y2-y; X2-IKT( 3*»NG( 1 ) *173  r X-XZ í POKEFMt L l0 i  *  30720 , 4 ; POKEFNCL  < *3  ,233 
3040  P 1  * INT c34Rn£l i  1*11  ;P1-P| *5 : P2- 1«T *3*RND< 1>  4 | 3 iP2-L4~PZ:  l«INT<  Z#RHD<  L  J  *1 .3 
3050  E  F I - 1 T  HENL I -253 1  GOTO  3060 
3053  L 1*Z34 

3060  |- |RT i 2#RhD 1)1*13 ; IF [- 1 ThEnl 2-*7; GQTÜ3070 
3063  t.2-232 

3070  x-Pi : Y-63POKEFMCL  <B) *30720,3 :POKEFNCL  <03  ,L1 
3*71  FOftx-Pl*  lT(JP2-i;Y-6;P04íEFhiCt.  101  *30720,3 

3079  PEJKÉFNCL  £0  3  ,  £  60 1  mEXTx;  X-P2í  POkEFNCL  r0i  *3*720, 3;  POHfFhCL  £0  3  H  L2 

30B0  FEM»r-i?TO  l  ?í  Rfi-  £  64RND  111*13 

3085  I F  H  R  **  1  T  34E  NA  1 «  P  1  *  Z  i  L  i  *■  Z34 

3060  IFRR-2ThtENAl-Pl*l±L1^234 

30R5  1FRR  'a  2  THE  NA  l-Pl  £  L 1  —  225 

3  100  RR-  INT  1  4#R3*JE> !  11*11:  IFRR  -  j  F HrENA 2+F Z -  Z i  L Z »23í 
3110  ÍFRR-2THENA2-P2- l;L2-232 
31 ZP  I FRp  ?  2 T hEMA2- F 2  £  L 2-0 7 
313*  1 F*2 í A lORA 1 -A2  T  HEM31 60 

3140  x-Al  £  PDKEFNCL  <03  *  30720 ,3:  POKÉFNCL  <  03  .  L  *  í  F0BX-A.1  *  1  TQA2-  |  i  PQkEF  nCí-  <  0J  *  30720 , 3 
3145  POKEFMCL  (03,1  60  £  HE  X  T  X  T  K  -  A  2  £  POKEFRCL.  101  *30720 , 3  £  PQKEFNCL  (03  ,L2 
3130  Pl-Al :P2-A2! IFTT-I THEN316* 

3133  NCXTY 

3160  PX-P1  £  Py-t  ;  »t  I  Lfpfü 

320B  I F  fi - i T  m£  RR* ■ -  £  RR  3 

32 I 0  W-W* i RR7 INT C60RND  < 1 I +4 I 1 

3220  I FU< - Z  T  HE  NW  * - 2 

3  Z  23  I  FU  >  2THEI#y- Z 

3Z33  blD -  24 0 :  UH-  I  M T  <  AIS  IViBl  3  ¡  1  F  VH  t  i  5THENWH- 13 
3248  I F R ' 0  T HE R3 Z 70 

3260  »Pjí :  Y -PY :  POKCF 34CL  c 0 ]  * 30 720 , 6 £  P QkE F HCL  £0J  ,  103TT-Y*! 

326  t  POKEFNCL  <*: *  3*720 ,*! POKEFNCL (#3  ,1*3 

3262  POKEFnCL  <*i  *30721  PÍJKEFnCL  <  01  +  I  *  1  02  £  GO?O3300 

327*  X-PX£  Y-PY; PDKEFNCL  <*i  *30720 ,*£ PDKEFNCL  <03 . 103: Y-Y*| 

3271  POkEFhCL  <01 +3072*. *: POKÉFNCL <01 , 10Z 

3272  PDKEFNCL £0] *30721 ,6£  PDKEFNCL (01*1,32 

33*0  PR  INT " ÍHOH 1 I Z2CR&RD  J *  EPC I 31  ■ í RVSDN 1 1 ORN 1 1  i 2SPC } * | 

330  E  PR  INT  ■  LHON3  E  ZCRSRD  1 1  HUSONj  [RED  J  BC  *  *  H  1  *(HOHl  [2CRSRDJ  E  1  1CRSRH  1 1  P4JR  1SC- 'H2 
3302  PR INT* 1HGH  T I 22CRSRD ) " EPC <31  ' [ RvSÜN 1 1 GRN 1 Vj EN TO 1 I  NT  1 ABE (V480J  3  vKHHf BLK1 * | IRE 
TURN 


Lisiado  3*  Programa  de  "Artillería"  convertido  para  C-64, 


Artillería  C-64. 


0  ■_  l  p  bef  n  [l  l  ■  r  ■ = 1 024  *  5 + 1  n  r  ■  2  4  *  5-v  >  *40 * : ;  x*pn»  ■  -  i  i  ■  pl  ^  ¡ 

i  REM#ESTQ  E6  ARTILLERIA  -.4  PROGRAMA  CONVERTI DO  DE  PUBLIC  BOMBIN 

4  G08UB3S»  PLMfPUTIHR  DE  INlCtflLIZflCION 

5  PR  l  NT "  C  CLP  r  POKE  ra .  i  POttE  &H  -  1  POK  ECU  -II  F  »54  2 . 

7  GO5UB4000  PEMf INSTRUCCIONES 
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más  baju)  emiten  sonidos  musicales  y 
el  último  registro  emite  ruidos* 

Sonido  "OnT'  —  Sonido  “Of r 

Bl  procedimiento  para  producir 
sonido  en  el  C-64  es  el  siguiente: 

— Se  hace  un  “Poke”  en  el  registro 
de  volumen  al  nivel  del  VIC. 

—  Restar  127  del  nivel  del  registro 
de  frecuencia  del  VIC  y  multiplicar  el 
resultado  por  dos* 

“Se  hace  un  “Poke"  en  el  registro 
de  alta  frecuencia  al  valor  obtenido 
del  último  paso. 

— Se  hace  un  ^Poke”  en  el  registro 
de  forma  de  ondas  a  17  o  a  129  para 
encender  el  sonido  correcto. 

Una  simple  operación  de  “Poke’1 
de  la  forma  en  ondas,  16  ó  128,  apaga 
el  sonido  del  C-64.  El  sonido  se  apaga 
al  fijar  la  frecuencia  a  un  valor  menor 
de  128* 

La  duración  de!  sonido  en  el  C-64 
depende  en  parte  si  el  “Poke”  de 
forma  de  onda  del  C-64  se  encuentra 
dentro  del  circuito  de  sonido.  Tam¬ 
bién  podría  ser  necesario  modificar  el 
tamaño  del  paso  de  un  circuito  dadas 
las  diferencias  del  alcance  de  la  fre¬ 
cuencia  del  “Poke”.  La  Línea  65  del 
programa  del  C-64  constituye  un 
ejemplo  de  este  tipo  de  cambio. 

Línea  27:  Yo  añadí  esta  sentencia  a 
La  versión  deí  C-64  para  que  almace¬ 
nara  el  ángulo  y  la  pólvora  seleccio¬ 
nados  en  el  “array”  elegido  del  juga¬ 
dor*  El  programa  convierte  el  ángulo 
a  radianes  (vea  los  comentarios  en  la 
línea  24). 

(Para  los  numerosos  lectores  que 
nunca  lo  supieron  o  que  olvidaron  los 
ángulos  se  pueden  medir  por  radianes 
en  vez  de  por  grados.  Un  radián  es  la 
medida  de  un  ángulo  — con  el  vértice 
en  el  centro  de  un  circulo —  cuyos 
lados  cortan  un  arco  de  dicho  círculo 
que  es  igual  en  longitud  at  radio  del 
círculo*  Así,  la  circunferencia  total  de 
un  círculo  —360  grados —  es  de  2 
radianes.) 

Lineas  28  a  35:  Estas  sentencias  se 
añaden  para  representar  el  ángulo,  la 
pólvora  y  la  velocidad  del  viento 
actuales  para  ambos  jugadores  en  el 
campo  adicional  de  la  pantalla  del  C- 
64.  Si  estos  parámetros  no  se  impri¬ 
mieran,  el  Jado  derecho  de  la  pantalla 
del  C-64  quedaría  en  blanco.  Se  tienen 
que  tomar  decisiones  respecto  a  esta 
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Líneas  110,  2060,  3003,  3007,  3010, 
3030,  3035,  3070-3075,  3140-3145, 
sección  de  la  pantalla  por  cada  opera¬ 
ción  de  conversión* 

A  veces  esta  zona  se  debe  de  usar 
para  representar  la  puntuación,  las 
instrucciones  del  juego  u  otro  tipo  de 
información  que  ios  jugadores  ten¬ 


drían  que  apuntar  en  trozos  de  papel 
en  la  versión  del  VIC.  En  otras  oca¬ 
siones  el  tamaño  dei  campo  de  juego 
se  tiene  que  ampliar.  SÍ  es  posible  es 
mejor  utilizar  esta  zona  porque,  sí  no 
se  hace  asi,  la  pantalla  da  la  impresión 
de  ser  incompleta. 

Líneas  37  y  38:  Estas  modificacio¬ 


nes  son  necesarias  para  aumentar  el 
tamaño  del  campo  en  blanco  utili¬ 
zado  para  que  quepan  las  líneas  más 
largas  del  C-64.  Cuando  se  dispara  el 
cañón,  estas  sentencias  borran  la  pun¬ 
tuación  y  las  variables  seleccionadas* 
3260,  3261,  3270  y  3271:  En  estas 
líneas  se  sustituye  el  “offset”  entre  las 
posiciones  de  los  caracteres  y  la 
memoria  en  colores  del  C-64  por  el 
“offset”  del  VIC  (30720)*  El  “offset” 
del  C-64  (54272)  se  almacena  como  la 
variable  KX  en  la  sentencia  5. 

Línea  115:  Esta  sentencia  com¬ 
prueba  que  un  “Poke”  válido  será 
ejecutado  en  la  sentencia  120.  Las 
modificaciones  son  necesarias  dados 
los  diferentes  alcances  de  las  frecuen¬ 
cias  de  sonido  del  “Poke”  de  las  dos 
máquinas. 

Lineas  1000  y  1 1 10:  Se  sustituye  el 
número  de  columnas  en  la  pantalla 
del  C-64  (40)  por  el  número  de 
columnas  del  VIC  (22)  en  ambas  sen¬ 
tencias  “Peek”. 

Líneas  2070  y  2075:  Los  “Poke”  de 
pantalla  para  la  versión  del  C-64  se 
modifican  para  reflejar  el  mayor 
número  de  columnas.  El  22  del  VIC  se 
convierte  en  40.  De  modo  semejante, 
el  43  del  VIC  se  convierte  en  79, 
siendo  uno  menos  que  dos  veces  el 
número  de  columnas  en  la  pantalla. 
Finalmente,  el  VIC  45  se  conviene  en 
81,  siendo  uno  más  que  dos  veces  el 
número  de  columnas* 

Resumen 

Este  ejercicio  demuestra  que  no  es 
difícil  convertir  un  programa  VIC 
para  que  se  procese  en  un  C-64.  Dado 
que  las  dos  máquinas  comparten  el 
mismo  lenguaje  Basic  (Commodore 
2.0),  todas  las  sentencias  lógicas,  y  las 
expresiones  matemáticas  son  total¬ 
mente  transferí  bles*  Principalmente 
los  programas  se  tienen  que  modificar 
cuando  entran  en  juego  los  “Peek”  y 
los  “Poke”*  La  Tabla  3  presenta 
algunas  direcciones  importantes  que 
normalmente  se  encuentran  en  los  lis¬ 
tados  del  VIC,  con  las  direcciones 
correspondientes  para  el  C-64* 

Si  vd.  tropieza  con  estas  direcciones 
en  el  proceso  de  conversión,  cambie 
las  direcciones  de  la  forma  que  hemos 
mencionado  antes,  y  obtendrá  los 
resultados  correctos  del  programa.  Si 
tiene  alguna  dificultad  o  encuentra 
una  dirección  no  mencionada,  la 
“Guia  de  Referencia  para  Programa- 
dores  del  Commodore”  le  proporcio¬ 
nará  una  información  adicional.  Si 
sigue  teniendo  problemas*  un  grupo 
de  usuarios  o  amigos  podrán  ayudarle» 


SUSCRIPCIONES 
POR  TELEFONO 

Simplemente,  morcando  el 

(91)  259  54  78 

y  preguntando  por  Valerie  o  María 


{WIÍCJJ1 

¡5? 

J5 

pedéis  suscribiros  a 


ANUNCIOS  EN  LA  REVISTA 

Si  deseáis  anunciaros  en  Commodore  World 
o  recibir  tarifas  de  publicidad,  llamad  o  escribid  a 

Pedro  Muguruza  4-8-  B  Sant  Gervassi  de  Cassoles,  39 
Madrid- 16  despacho  4 

Teléfono:  (91)  259  54  78  Barcelona- 22 

Teléfono:  (93)  21 2  73  45 
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■KTROCOMPUTER  ■  PRESENTA  SUS  NUEVOS  PRODUCTOS  PARA  EL  V  I  C  -  2  0 
Y  EL  C0MMQD0RE-64.  DATAMASTER  64  Y  CONTROLADOR  >  C  8  ,  QUE 
AMPLIAN  LAS  POSIBILIDADES  DE  SU  ORDENADOR. 

DE  VENTA  EN  DISTRIBUIDORES  AUTORIZADOS  DE  TODA  ESPAÑA. 


DATAMASTER  64  _  SOFISTICADA  BASE  DE  DATOS  PARA  EL  C—  64  . 


■í\ 


PENSADA  PARA  TRABAJAR  CON  LA  UNIDAD  DE  DISCO  1541.  SIENDO  MUY 
VERSATIL  APROVECHA  AL  MAXIMO  LA  CAPACIDAD  DE  MANIOBRA  Y  ALMA- 
^  CENAMIENTO  .  NUMERO  DE  REGISTROS  VARIABLE'EJ.  5000  BE  30  CA¬ 
RACTERES*  .  FORMATE  ADOS  Y  COPIAS  PROGRAMADAS  .  SALIDA  A  IM 


^  PRESORA  I  PARALELO  CENTRONICS  Y  SERIE  RS232  )  CHEQUEO  OPERACIONES 

DISCO  .  GARANTIA  3  MESES  .  MANUAL  COMPL .  EN  CASTE  LLANO  -  P.  V.P.  11.8  00’  PTAS. 
‘CONTROLADOR  ■  C8  _  CONTROLADOR  DE  8  RELES 
PARA  EL  VIC  20  Y  EL  C  64  .  DE  FORMA  MUY  SENCILLA  PODE 

MOS  HACER  HASTA  255  COMBINACIONES  ENTRE  LOS  8  RE- 
LES  .  CON  UN  CONSUMO  DE  1000  W.  A  220  VOLT.  CADA  UNO. 

CON  LO  CUAL  PODEMOS  ACCIONAR  TODO  TIPO  DE  LUCES  O 
MECANISMOS  .  INSTRUC.  INCLUIDAS  .  3  MESES  GARANTIA 
“  P.V.P.  9.800’  PTAS. 
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VENTANA  CBM  (IV) 


Los  capítulos  anteriores  fueron 
publicados  en  Commodore  Club.  Aquellos  lectores 
que  los  deseen,  les  rogamos  nos 
lo  comuniquen  para  poder  enviarles  copia 
de  dichos  artículos. 


READY 

(del  chip  a  la  base  de  datos) 

(I) 


Cumpliendo  con  lo  pro¬ 
metido  en  números  an¬ 
teriores,  voy  a  comentaros 
en  éste  algunos  aspectos  del 
sistema  co-residente  MEC/- 
DOS  (MicroElectrónica  y 
Control/Disc  Operating 
Sistem). 

MEC/DOS  es  un  sis¬ 
tema  operativo  co-residente 
con  el  BASIC  y  el  KER- 
NAL,  escrito  en  assembler 
por  MEC  SOFT  para  los 
micros  de  la  serie  7XX  de 
COMMODORE. 

Por  Rafael  NAVARRO 


Recomendado  para 
C-64  y  0700 


Lo  primero  que  cabe  destacar  en  él  es 
que  su  nombre  no  lo  define  totalmente  ya 
que  los  criterios  considerados  para  su 
bautizo  fueron  más  comerciales  y  estéticos 
que  técnicos;  no  se  Lrata  exactamente  de 
un  sistema  operativo  de  disco  ya  que,  por 
un  lado,  funciones  elementales  de  sistema, 
como  la  copia  de  discos  o  su  formatación 
se  dejan  al  sistema  base  de  COMMO¬ 
DORE  y,  por  otro,  MEC/DOS  abarca 
también  otras  áreas,  como  la  edición  de 
pantallas  y  el  cálculo. 

Desde  este  punto  de  vista,  podría 
decirse  que  MEC/DOS  es  un  conjunto  de 
ayudas  a  la  programación  que,  sin  perder 
su  carácter  universal,  se  enfoca  a  facilitar 
la  programación  y  el  desarrollo  de  aplica¬ 
ciones  para  gestión  y  control  de  actividades 
en  la  empresa.  Acordes  con  la  filosofía  de 
COMMODORE,  hemos  integrado  el  sis¬ 
tema  en  un  cartucho  con  16K  de  eprom, 
conteniendo  el  código  y  8K  de  ram  de  uso 
interno,  evitando  de  este  modo  los  tiem¬ 
pos  de  carga  (bootstraps)  que  otros  siste¬ 
mas  padecen.  Se  trata  pues  de  un  con¬ 
cepto  nuevo  entre  los  productos  desarro¬ 
llados  tanto  para  COMMODORE  como 
para  otros  sistemas: 

— no  ocupa  RAM  del  usuario, 

—no  interfiere  e!  BASIC  residente  aun¬ 
que  aprovecha  algunas  de  sus  rutinas 
— debido  a  su  alto  nivel  de  estructura¬ 
ción  interna  es  independiente  del  len¬ 
guaje  empleado 

—para  cuando  se  trabaje  con  el  BASIC 
residente  (interpretado)  dispone  de  su 
propio  interpretador  que  trabaja  en 
base  a  comandos  con  nombre  propio 
(nada  de  SYS  34567  o  CALE  56678 
totalmente  carentes  de  significado)  y 
opera  en  entradaAalida  con  paráme¬ 
tros  (variables)  bajo  el  mismo  for¬ 
mato  que  el  BASIC 


—es  extremadamente  fácil  de  entender, 
aprender  y  utilizar 

— dispone  de  un  sistema  automático  de 
protección  contra  errores  tanto  de 
usuario  como  de  sistema,  lo  cual  le 
confiere  un  alto  nivel  de  seguridad  e 
información,  ya  que  no  sólo  lo  avisa 
de  los  estados  de  error  si  no  que 
informa  de  las  características  de  los 
mismos  mediante  completos  mensajes. 

MEC/DOS  abarca  las  siguientes  áreas 
de  trabajo: 

— Tratamiento  de  ficheros  relativos. 

— T rat amiento  de  ficheros  de  claves. 

— Tratamiento  de  ficheros  tablas. 

—Tratamiento  de  campos  (des/empa¬ 
quetado) 

— Edición  y  tratamiento  de  pantallas, 

— Múltiple  precisión. 

—Intérprete  MEC/DOS  (con  BASIC 
residente). 

Al  11  nal  de  este  artículo  se  encuentra  la 
tabla  resumen  de  los  comandos  que 
acompaña  al  manual  de  MEC/DOS. 
Considérese  que  en  ella  aparecen  los 
comandos  por  el  nombre  que  es  inteligible 
para  el  interpretador  MEC/DOS.  Cuando 
se  opere  bajo  un  entorno  que  no  sea  d 
interpretador  BASIC  de  COMMODORE 
(compilador  BASIC,  — PET  SPEED — , 
PASCAL  — DTL—,  u  otros)  el  formato 
de  utilización  será  diferente,  pero  siempre 
posible. 


El  interpretador 

El  interpretador  está  constituido  por 
una  serie  de  programas  que  comunican  al 
programador  con  el  núcleo  de  MECA 
DOS.  Tanto  desde  el  punto  de  vista 
interno  como  en  su  relación  con  el  pro¬ 
gramador,  MEC/DOS  utiliza  un  buffer 
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Base  de  datos  Base  &  datos 

(Fotos  cedidas  por  DESOÍ 


(área  de  memoria  reservada)  para  comu¬ 
nicar  datos  de  enlradaAaltda  entre  las 
diferentes  rutinas  que  constituyen  el  sis¬ 
tema  y  entre  éstas  y  el  programador.  La 
fundón  del  interpretador  es  facilitar  dicha 
comunicación  a  través  de  variables  BASIC. 
De  modo  sucinto»  podemos  definir  el 
siguiente  modas  operandi  para  el  interpre¬ 
tador: 

— lectura  del  comando 
— comprobación  de  la  sintaxis 
—lectura  de  parámetros  y  formatación 
de  los  mismos 

—ejecución  del  comando  propiamente 
dicho 

— recogida  de  los  datos  de  salida 
— formatación  de  los  mismos 
—devolución  de  resultados  a  través  de 
variables  BASIC 

— actualización  de  la  variable  OK  (avi¬ 
sos  y  errores) 

—impresión  de  mensaje  de  error  y  lis¬ 
tado  de  la  línea  donde  se  produjo 
(opcional) 

MEC/DOS  ofrece  50  comandos  dife¬ 
rentes  cuya  longitud  es  de  6  caracteres 
reconocibles»  tras  los  cuales  puede  aña¬ 
dirse  cualquier  afijo  para  hacerlos  más 
significativos  todavía.  Por  ejemplo»  el 
comando  ''LIBER A”  (liberación  de  un 
registro  de  fichero  relativo  para  su  poste¬ 
rior  utilización  tras  una  baja)  puede  ser 
escrito  como  “LIBERA  EL  REGISTRO 
QUE  A  CONTINUACION  TE  INDICO" 
siendo  el  aspecto  final  de  la  instrucción 


algo  así  como:  “LIBERA  EL  REGISTRO 
QUE  TE  INDICO”,  NF*  NR.  para  liberar 
al  registro  NR  del  fichero  NF,  Como  se 
ve»  no  puede  ser  más  claro.  En  este  caso, 
solamente  existen  dos  parámetros  de 
entrada  (NF  y  NR)  y  ninguno  de  salida  y 
obviamos  que  OK  — que  será  cargado  con 
un  0  si  la  operación  se  ha  llevado  a  cabo 
sin  error  y  con  otro  valor  en  caso 
contrario —  no  es  un  parámetro  de  salida 
si  no  la  variable  de  estado  de  MEC/DOS. 
El  sistema  permite  la  utilización  de  los 
siguientes  parámetros. 

En  entrada: 

— constantes  numéricas 
— constantes  alfa 

— variables  numéricas  simples  o  array 
— variables  alfa  simples  o  array 
— cualquier  tipo  de  expresión  alfa  o 
numérica. 

En  salida: 

— variables  numéricas  simples  o  array 
— variables  alfa  simples  o  array 
Aunque  es  imposible  en  este  espacio  dar 
una  idea  exacta  de  lo  que  representa 
MEC/DOS  en  todos  los  aspectos»  las 
siguientes  lineas  pretenden  dar  una  idea 
muy  general  de  sus  posibilidades. 

Ficheros  relativos 

Los  ficheros  relativos  son  ficheros  de 
estructura  muy  similar  a  los  del  BASIC  de 
COMMODORE  y  otros  de  los  basics  que 
ruedan  bajo  CP/M  o  MS/DOS.  De 


hecho,  tanto  los  RELATIVOS  como  las 
CLAVES  DE  MEC/DOS  están  soporta¬ 
dos  por  ficheros  de  estructura  RELA¬ 
TIVO  de  COMMODORE.  Las  diferen¬ 
cias  fundamentales  estriban  en  los  si¬ 
guientes  puntos. 

—MEC/DOS  permite  tener  abiertos  12 
ficheros  simultáneos 
se  efectúa  un  control  de  los  registros 
libres  y  ocupados 

—se  gestionan  automáticamente  los 
campos  de  cada  registro  procediendo 
a  su  empaquetado  y  desempaquetado 
en  los  procesos  de  entrada/salida. 

—a  tal  efecto  no  es  necesaria  ninguna 
preparación  previa  en  el  programa 
(existe  un  descriptor,  generado  en  el 
momento  de  definir  el  fichero).  Basta 
con  definir  los  ficheros  una  sola  vez 
mediante  un  utilitario  y  MEC/DOS 
recuerda  siempre  las  características 
de  los  mismos 

—existe  una  detección  automática  de 
errores  que  no  obliga  al  testeado 
constante  de  variables  de  errores  (DS 
y  DSS  en  COMMODORE,  ER.  EL. 
ER$  en  otros  sistemas) 

— en  el  capítulo  de  seguridad»  cabe  des¬ 
tacar  además,  la  existencia  de  co¬ 
mandos  de  repaso  de  seguridad  y 
arreglo  automático  de  posibles  erro¬ 
res. 

— grandes  facilidades  para  la  amplia¬ 
ción  y/o  cambio  de  estructura  de  los 
ficheros. 


TABLA  RESUMEN  DE  COMANDOS  DEL  MEC/DOS 


INICIALIZACION 

COMANDO 

EXPLICACION 

VALORES  DE  OK 

INIT 

Inicializa  MEC/DOS  reseteando  las 
unidades  de  disco  conectadas.  Pone 
como  periférico  por  defecto  de  unidad 
de  discos  8. 

OK  =  0;  correcto 

DISIPE 

Cambia  el  numero  de  periférico  por 
defecto  para  los  comandos  CHARGE  y 
ASSIGN. 

OK  =  0:  correcto 
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READY 

(del  chip  a  la  base  de  datos) 


FICHEROS  {GENERAL) 

COMANDO 

EXPLICACION 

VALORES  DE  OK 

ASSIGN,  nf,  nfS  [,d{dr)l 
[,u(pe>]  [,P1 

Asigna  el  fichero  nf  permitiendo  al 
operador  trabajar  refiriéndose  sola¬ 
mente  a  nf. 

ÜK  -  0;  correcto 

OK  =  1;  comando  no  permitido 

OK  =  2;  nf  ya  asignado 

OK  =  3;  demasiados  ficheros 
asignados 

OK  —  4;  demasiados  ficheros 
prioritarios 

OK  =  13;  error  de  checksum  en 
carga  de  tablas. 

KEEP.nf 

Para  ficheros  de  tablas  graba  la  tabla 
y  reabre  el  fichero. 

Para  ficheros  relativos  graba  el  des¬ 
criptor  si  ha  cambiado  el  primer  regis¬ 
tro  libre  y  reabre  el  fichero. 

En  ficheros  de  claves,  cierra  y  abre  el 
fichero. 

OK  —  0;  correcto 

OK  =  5;  fichero  no  asignado 

LOCK,nf  [nf,nf...] 

Cierra  ficheros  y  graba,  si  procede, 
descriptores  y/o  tablas. 

,  OK  -  0;  correcto 

OK  -  5;  fichero  no  asignado 

FICHEROS  RELATIVOS 


COMANDO 

EXPLICACION 

VALORES  DÉ  OK 

USE.NF.NR 

Coloca  el  registro  NR  del  fichero  NF 
en  estado  de  "ocupado”,  permitien¬ 
do  de  este  modo,  grabar  (WRITE) 
sobre  el  mismo. 

OK  -  0;  correcto 

OK  =  5;  NF  no  asignado 

OK  -  6;  NR  fuera  de  rango 

OK  -  9;  NR  ya  ocupado 

LIBERATE, NF,NR 

Libera  el  registro  NR  del  fichero 

NF. 

OK  =  0;  correcto 

OK  —  1;  comando  no  apropiado 

OK  —  5;  NF  no  asignado 

OK  =  6;  NR  fuera  de  rango 

OK  -  7;  registro  ya  liberado 

READ.NF.NR 

Carga  en  el  buffer  el  registro  NR  del 
fichero  NFr  dando  acceso  a  consultas 
y  variaciones  del  contenido  de  NR. 

OK  =  0;  correcto 

OK  =  5;  NF  no  asignado 

OK  =  6;  NR  fuera  de  rango 

OK  —  7;  registro  libre 

WRITE.  NF,NR 

Graba  el  contenido  del  buffer  del  fi¬ 
chero  NF  sobre  el  registro  NR  del 
mismo.  El  contenido  del  buffer  per¬ 
manece  intacto.  El  registro  debe  estar 
ya  ocupado. 

OK  =  0;  correcto 

OK  =  5;  NF  no  asignado 

OK  —  6;  NR  fuera  de  rango 

OK  =  7:  registro  libre 

AVAIL.NF.NR 

Devuelve  en  OK  la  disponibilidad  del 
registro  NR  del  fichero  NF. 

Los  valores  de  OK  7  y  9  no  produ¬ 
cen  mensaje  en  este  comando,  por 
meramente  informativos. 

OK  —  5;  NF  no  asignado 

OK  —  6;  {NR  fuera  de  rango) 

OK  =  7;  registro  libre 

OK  =  9;  registro  ocupado 

FIRST,NF,VR 

Devuelve  en  VR  el  valor  del  primer 
registro  libre  del  fichero  NF.  Cero  si 

NF  esta  lleno. 

OK  -  0;  correcto 

OK  =  5;  NF  no  asignado 

OK  -  8;  NF  completo 

REL!NK,NF 

Repasa,  caso  de  existir  sospechas 
sobre  su  integridad,  las  cadenas  de 
control  de  registros  libres  del  fichero 

NF, 

OK  =  0;  correcto 

OK  =  1;  comando  no  apropiado 
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¡Arriba  Periscopio! 


Los  gráficos,  la  gene¬ 
ración  de  sonido,  las 
comunicaciones  y  un  número 
de  funciones  de  la  configura¬ 
ción  de  un  equipo  dependen 
de  que  el  usuario  seleccione 
unos  bits  específicos  de  una 
posición  definida  de  memoria, 
que  haga  un  “PEEK”  en  di¬ 
cha  posición  para  saber  cuá¬ 
les  son  los  bits  puestos  aló 
a  0  y  luego  haga  un  “POKE” 
en  esa  posición  de  memoria 
para  poner  a  1  o  a  0  los  bits 
que  necesite. 


COMMODORE  64 

O 

VIC-20  de 
3  Ko  más 


Para  nosotros,  quienes  a  veces  tenemos 
problemas  para  pensaren  valores  hexade- 
cimales  y  binarios  e  ignoramos  cuáles  son 
los  valores  almacenados  en  la  memoria,  el 
programa  “Periscopio”  para  el  Commo¬ 
dore  64  y  el  VIC-20  proporciona  un  ins¬ 
trumento  utü  para  que  emendamos  mejor 
nuestras  máquinas. 

El  programa  “Periscopio”  se  escribe 
totalmente  en  Basic  y  permite  que  el  usua¬ 
rio  vuelque  los  valores  hexadecimales 
almacenados  en  una  serie  de  posiciones  de 
memoria,  corregir  (poner  un  PATCH)  (en 
hexadecimal)  unos  valores  en  una  serie  de 
posiciones  de  memoria,  desensamblar  los 
valores  hexadecimales  de  una  serie  de 
posiciones  de  memoria  en  instrucciones  de 
lenguaje  ensamblador  del  6502/6510,  y 
convertir  los  valores  de  números  de  deci¬ 
mal,  hexadecimal  o  binario  en  todas  las 
tres  bases. 

Operación  del  Programa, 

Cuando  se  ejecuta  el  programa  “Peris¬ 
copio”,  lo  primero  que  hace  es  borrar  la 
pantalla  y  representar  un  menú  de  opcio¬ 
nes.  Se  selecciona  una  opción  mediante  la 
pulsación  de  un  número  de  1  a  5  antes  de 
pulsar  la  tecla  de  entrar  (ENTER), 
Cuando  se  haya  seleccionado  una  opción 
correcta,  el  programa  pregunta  o  bien  una 
dirección  de  principio  (¿Sí?)  o  bien  una 
pregunta  de  conversión  de  base  (13=DEC 
2-HEX  3=B1N)? 

Vamos  a  estudiar  las  opciones  para  ver 
lo  que  pueden  hacer  para  nosotros. 

Opcíón  1:  Volcado  IDurnp)-  La  opción 
de  volcado  representa  los  valores  almace¬ 
nados  en  la  memoria  en  notación  hexade¬ 
cimal  (dos  dígitos  hexadecimales  para 
cada  bvte  de  memoria).  Los  valores  de 
memoria  se  representan  a  partir  de  una 
dirección  inicial  a  una  dirección  final, 
introducidos  mediante  el  teclado.  Cuando 
se  selecciona  la  opción,  se  representa  una 
pregunta  de  dirección  de  principio  (¿Sí?) 

A  continuación  el  programa  espera  que 
se  introduzca  una  dirección  de  memoria 
de  dos  bvtes  (cuatro  dígitos  hexadecima¬ 
les),  Sí  se  produce  un  error  a)  introducir  la 
dirección,  no  se  puede  corregir  mediante 
una  operación  de  retroceso  (backspace), 
dado  que  ei  programa  no  reconoce  INSTA 
DEL,  Sin  embargo,  los  datos  de  la  direc¬ 
ción  se  pueden  volver  a  teclear  justo  des¬ 
pués  del  error  en  la  misma  linea.  El 
programa  acepta  los  últimos  cuatro  dígi¬ 
tos  tecleados  antes  de  haber  pulsado  la 
tecla  “RETURN”,  sea  cual  sea  el  número 
total  de  caracteres  que  hayan  sido  teclea¬ 
dos  en  la  linea. 

Después  de  introducir  la  dirección  ini¬ 
cial,  el  programa  contesta  con  un  mensaje 
de  dirección  final  de  .  La  dirección 


final  se  introduce  de  la  misma  forma  que 
la  dirección  inicial,  considerando  los  últi¬ 
mos  cuatro  dígitos  tecleados  como  el 
valor  real. 

Si  se  introducen  solamente  dos  o  tres 
dígitos  hexadecimales,  el  programa  supone 
que  los  caracteres  de  la  extrema  izquierda 
son  ceros.  Por  ejemplo,  sí  se  teclea  AE 
hexadecimal  y  se  pulsa  la  tecla  “RETUR  N'\ 
el  programa  supone  que  significa  la  direc¬ 
ción  de  00 AE  hexadecimal. 

Si  el  programa  tiene  las  direcciones  de 
principio  y  final  para  el  volcado  de  memo¬ 
ria,  se  presenta  un  mensaje  de  “Salida  de 
Impresora  (Sí/No),  Una  respuesta  de  Si 
dirige  la  salida  a  la  impresora  1525  de 
Commodore,  Si  se  introduce  una  N,  o 
simplemente  se  pulsa  la  tecla  “RETUR  N", 
la  salida  se  dirige  a  la  pantalla. 

Sí  se  pulsa  la  tecla  “ENTER”,  el  pro¬ 
grama  imprime  una  dirección  de  memoria 
hexadecimal  seguida  por  ocho  valores 
hexadecimales  almacenados  en  la  memo¬ 
ria  del  VIC-20.  El  programa  sigue  impri¬ 
miendo  las  direcciones  de  memoria, 
seguidas  por  los  valores  de  memoria  en 
grupos  de  seis  u  ocho  hytes,  hasta  que  se 
llega  a  la  dirección  final  o  hasta  que  se 
pulsa  cualquier  tecla  alfa  numérica  en  el 
teclado  cuando  se  representan  los  valores 
en  la  pantalla. 

Cuando  se  pulsa  una  tecla  durante  una 
operación  de  volcado  en  la  pantalla,  la 
salida  se  detiene  y  el  programa  espera  que 
se  pulse  otra  tecla  antes  de  continuar  la 
operación.  Así  los  datos  no  se  pierden 
fuera  de  la  pantalla  antes  de  que  se  pue¬ 
dan  leer.  Si  la  tecla  que  se  pulsa  para  inte¬ 
rrumpir  la  representación  es  la  “X”*  la 
operación  de  volcado  finaliza  y  el  pro¬ 
grama  vuelve  a  presentar  la  pregunta 
¿Yes?  (¿Sí?).  Si  la  tecla  “X”  se  vuelve  a 
pulsar,  el  programa  vuelve  al  menú. 

Si  se  introduce  la  dirección  hexadeci- 
mal,  el  programa  pedirá  la  dirección  final 
y  la  salida  de  impresora,  y  luego  realiza 
una  operación  de  volcado  de  los  valores 
de  memoria  empezando  por  la  nueva 
dirección  inicial.  Cuando  se  llega  a  la 
dirección  final,  el  programa  representa  la 
pregunta  ¿Yes?  y  otro  volcado  puede  ser 
seleccionado,  o  si  no,  se  pulsa  la  teda  “X" 
para  volver  al  menú. 

Opción  2:  Corrección  (Patch)  -  La 
opción  de  corrección  (Patch)  permite 
introducir  valores  hexadecimales  en  la 
memoria.  Cuando  la  opción  es  seleccio¬ 
nada,  el  programa  presenta  la  segunda 
Yes?  Una  dirección  inicial  debe  introdu¬ 
cirse  de  la  misma  manera  en  que  se  hizo 
con  la  opción  de  volcado,  o  si  no,  se  puede 
pulsar  la  tecla  “X”  para  volver  al  menú. 

Después  de  introducir  una  dirección 
inicial,  el  programa  presenta  el  mensaje > . 
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Se  introduce  la  dirección  final  o  una  X 
para  volver  al  menú.  Después  de  introdu¬ 
cir  la  dirección  final,  el  programa  presenta 
la  dirección  inicial  en  hexadeeimal  y 
espera  que  se  introduzca  un  valor  hcxade- 
cima!  de  un  byte.  Un  error  al  teclear  se 
puede  corregir  de  la  misma  forma  en  que 
se  hace  cuando  se  introduce  una  direc¬ 
ción;  se  teclea  el  valor  correcto  justo  des¬ 
pués  del  error.  El  programa  acepta  los 
últimos  dos  dígitos  hexadecimales  en  la 
linea  como  el  valor  correcto  que  se  coloca 
en  la  memoria. 

El  programa  continuará  representando 
la  siguiente  posición  de  memoria  y  espe¬ 
rará  que  el  usuario  entre  un  nuevo  valor. 
Esta  secuencia  continuará  hasta  que  la 
posición  final  sea  alcanzada  o  hasta  que  se 
pulse  la  teda  "X”,  Si  la  tecla  “X”  es  pul¬ 
sada.  la  rutina  de  entrada  de  datos  termi¬ 
nará  y  aparecerá  el  mensaje  “¿Sí?'1.  Lo 
mismo  que  en  el  caso  de  la  función  de 
volcado»  un  nuevo  juego  de  direcciones 
pueden  entrarse,  o  pulsando  la  teda  “X" 
otra  vez  podemos  volver  al  menú. 

Opción  3:  Desensamblado  -  La  opera¬ 
ción  de  desensamblado  presentará  una 
sección  de  memoria  como  instrucciones 
del  ensamblador  del  6502/65 JO.  La  rutina 
traducirá  los  valores  hexadecimales  en 
una  posición  de  memoria  particular  de 
6502/6510  en  mnemónicos  del  lenguaje 
“assemblcr"  de!  6502/651(1  para  una  ins¬ 
trucción  particular,  y  la  presenta  en  panta¬ 
lla.  La  rutina  a  continuación  presentará 
los  valores  de  memoria  de  la  siguiente  o  de 
las  siguientes  dos  posiciones»  si  esto  lo 
requiere  el  direccionamiento  del  pro¬ 
grama  en  lenguaje  máquina. 

Los  mensajes  de  la  opción  dcsensam- 
Mador  y  la  entrada  de  datos  son  exacta¬ 
mente  iguales  que  en  el  caso  de  la  opción 
de  volcado.  Se  presentan  los  mensajes  de 
entrada  y  final  de  las  direcciones  y  ci  men¬ 
saje  de  salida  e  impresora.  En  ambos  men¬ 
sajes,  la  teda  “X"  puede  ser  pulsada  para 
volver  al  menú.  Mientras  que  el  desen- 
samblaje  se  presenta  en  la  pantalla,  la 
rutina  puede  ser  interrumpida  de  la  misma 
forma  que  la  rutina  dé  volcado.  Se  puede 
especificar  una  nueva  sección  de  memoria 
o  volver  al  menú. 

Opción  4:  Conversión  -  La  opción  de 
conversión  puede  convertir  un  valor 
numérico  entrado  como  decimal,  hexade- 
cimal  o  binario  en  cualquiera  de  las  dos 
bases  restantes  y  su  valor  presentado  en 
pantalla.  Cuando  se  selecciona  esta 
opción,  d  programa  presentará  el  mensaje 
de  conversión  (l=DEC  2=HEX  3=B1N?). 
A  continuación,  hay  que  pulsar  un 
número  correspondiente  a  la  base  que  se 
desee  a  bien  pulsar  la  teda  “X"  para  vol¬ 
ver  al  menú.  Después  de  haber  seleccio¬ 
nado  la  base,  el  programa  presentará  el 
mensaje  DEC?»  HEX?  o  BIN?.  A  conti¬ 
nuación  el  programa  esperará  la  entrada 
del  valor  en  la  base  especificada. 

Los  números  decimales  tienen  que  estar 
comprendidos  entre  0  y  65535  sin  ningún 
espacio  entre  los  dígitos.  Los  números 
hexadecimales  pueden  tener  hasta  cuatro 
caracteres  de  longitud  y  tienen  que  intro¬ 


ducirse  de  la  misma  forma  que  las  entra¬ 
das  de  direcciones.  Los  números  binarios 
tienen  que  tener  desde  uno,  hasta  máximo 
16  dígitos,  formados  por  unos  y  ceros.  De 
la  misma  forma  que  con  los  números 
decimales,  es  un  error  introducir  espacios 
en  blanco  entre  los  distintos  dígitos. 
Cuando  se  estén  introduciendo  números 
decimales  o  binarios,  se  puede  utilizar  la 
tecla  de  “borrado' 1  para  volver  a  La  posi¬ 
ción  anterior  y  corregir  la  última  entrada 
antes  de  pulsar  La  tecla  "ENTER’k 

Cuando  un  valor  ha  sido  introducido,  el 
programa  presentará  su  valor  convertido 
en  una  de  las  otras  dos  bases  soportadas. 
Un  número  decimal  se  representará  como 
un  valor  entero.  Un  número  hexadeeimal 
se  presentará  como  cuatro  caracteres 
hexadecimales.  Un  número  binario  se 
representará  como  dos  grups  de  ocho  dígi¬ 
tos  (que  es  la  representación  binaria  de 
dos  bytes). 

Después  de  haber  presentado  los  valo¬ 
res  convertidos,  d  programa  presentará  el 
mensaje  (1=DEC2=HEX  3=BIN)7y  otro 
valor  de  base  puede  ser  introducido,  o  se 
puede  pulsar  la  tecla  “X”  para  volver  ai 
menú. 

Opción  5:  Fin  -  La  opción  íln  com¬ 
prueba  para  asegurarse  de  que  la  impre¬ 
sora  está  desconectada  y  que  el  programa 
vuelve  a  dar  control  ai  editor  Basic  de 
pantalla  del  Commodore, 

Descripción  del  Programa 

El  programa  “Periscopio11  ha  sido  dise¬ 
ñado  para  ofrecer  un  instrumento  útil  y  al 
mismo  tiempo  utilizar  la  mayor  memoria 
posible.  Con  esto  en  mente,  en  cada  línea 
se  han  escrito  el  mayor  número  posible  de 
instrucciones.  No  se  han  utilizado  las  ins¬ 
trucciones  REM  por  el  mismo  motivo. 
Cuando  se  introduce  el  programa,  las 
líneas  600-610  tienen  que  ser  descartadas 
para  ahorrar  espacio.  El  programa  ocu¬ 
pará  entonces  aproximadamente  3000 
bytes  de  memoria  y  aproximadamente 
3785  bytes  de  memoria  cuando  funcione. 

El  programa  puede  ser  condensado  pos¬ 
teriormente  usando  los  comandos  abre¬ 
viados  de  dos  teclas  soportados  por  el 
Basic  de  Commodore.  Por  ejemplo,  las 
lineas  611  y  615  pueden  ser  combinadas. 
Los  comandos  de  datos  de  las  líneas  783- 
798  pueden  ser  condensador  en  menos 
líneas  en  total.  El  programa  ha  sido 
escrito  tal  cual  para  facilitar  la  entrada  del 
listado  dado  que  las  líneas  han  sido  cons¬ 
truidas  con  los  comandos  abreviados  de 
dos  teclas  que  normalmente  exceden  de 
las  80  caracteres  en  el  Commodore  64  y  de 
los  88  caracteres  en  el  VIC-20  cuando  se 
listan  en  pantalla.  Aunque  las  líneas  tra¬ 
ducidas  entren  dentro  de  una  línea  de 
Basic  en  memoria,  esta  línea  no  puede  ser 
editada  en  la  pantalla  sin  perder  datos,  de 
forma  que  la  linea  tiene  que  ser  escrita  de 
nuevo  desde  cero  para  corregir  los  errores. 
El  programa  tiene  que  ser  escrito  como  en, 
el  listado,  hay  que  ejecutarlo  para  detectar 
errores,  y  corregirlo.  Una  vez  que  fun¬ 
cione  correctamente,  puede  ser  condensado. 


El  listado  del  programa  puede  ser  utili¬ 
zado  tal  cual  en  el  Commodore  64.  Hay 
que  cambiar  una  linea  para  ejecutar  el 
programa  en  el  VIC-20.  En  la  linea  900,  el 
valor  (P-SJ/8  aparece  dos  veces.  Cambiar 
ocho  por  seis  en  ambos  sitios,  y  la  opción 
de  volcado  entrará  en  la  anchura  del  VfC- 
20. 

En  un  VIC-20  no  ampliado,  el  usuario 
podría  querer  borrar  algunas  opciones 
para  tener  más  memoria  libre  cuando  se 
ejecuta  el  programa  “Periscopio",  Por 
ejemplo,  borrando  las  líneas  670-6%  y 
borrando  el  valor  670  desde  la  linea  655  y 
PRfNT"4)  CONVE RT: 11  desde  640  y 
cambiando  PK1NT"5)  ENDen  PRINT'4) 
END",  la  opción  entera  de  conversión 
será  eliminada  del  programa.  Como 
herramienta  para  modificaciones  poste¬ 
riores  del  programa,  a  continuación 
tenemos  unas  descripciones  de  las  rutinas. 

Lineas  611-620:  Esta  rutina  inicializa  y 
llena  dos  “arruys"  con  dalos.  El  “arruy" 
0%  contiene  los  valores  empaquetados 
que,  cuando  son  desempaquetados,  nos 
dan  el  puntero  del  “arrav"  M$  y  el  pun¬ 
tero  de  las  subrutinas  correspondientes 
para  imprimir  los  diferentes  modos  del 
direccionamiento  del  6502/65 H). 

Líneas  630-659:  Estas  líneas  contienen 
las  rutinas  del  programa  principal,  que 
presentan  el  menú  de  opciones  en  las 
lineas  630  y  640,  hacen  un  “input"  de  la 
opción  seleccionada  en  la  línea  645  y  rese- 
tean  la  impresora  y  las  direcciones  de  las 
entradas  de  las  subrutinas  en  la  línea  650. 
La  linea  655  dirige  el  programa  a  la  subru¬ 
tina  de  la  opción  seleccionada. 

Líneas  665-667:  Esta  rutina  es  llamada 
para  inhibir  la  salida  a  la  impresora. 

Linea  660:  Esta  linea  llama  la  rutina 
que  inhibe  la  impresora  y  a  continuación 
acaba  el  programa. 

Líneas  670-696:  La  opción  de  rutina  de 
conversión  imprime  los  mensajes  de  con¬ 
versión  en  la  línea  670,  Las  lineas  672-682 
tienen  las  instrucciones  de  entrada  de 
selección  de  la  base,  e  imprimen  el 
número  de  bases  y  llaman  las  subrutinas 
de  conversión.  Las  líneas  684-686  con¬ 
vierten  una  entrada  binaria  en  un  número 
decimal  y  luego  llaman  la  rutina  de  impre¬ 
sión  del  número  decimal  en  la  línea  688. 

Un  número  decimal  es  convertido  en 
binario,  y  luego  impreso  como  un  número 
binario  de  1 6  bits  en  las  líneas  690-696.  La 
linea  696  llama  una  subrutina  en  la  linea 
950:  esta  subrutina  convierte  un  número 
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decimal  en  hexadecimal  e  imprime  los 
ea  ra  cíe  res  he  x  ade  ei  males. 

Línea  698;  Esta  rutina  nos  da  la  forma 
de  salimos  de  un  ‘loop"  Por...  Ncxi  y  de 
volver  al  menú.  Si  salimos  de  esta  subru- 
lina  sin  hacer  un  “RFTURN"*  o  si  un 
"loop”  For...  Next  es  acabado  demasiado 
pronto,  el  registro  de  "stack”  del  6502/6510 
se  llenará  de  basura  y  el  resultado  es  un 
error  de  “Out  Of  Memory"  cuando,  sin 
embargo,  todavía  hay  memoria  disponi¬ 
ble,  Esta  rutina  limpia  todos  los  internos 
de  la  máquina  cuando  salimos  del  "loop”. 

Líneas  700-782:  Esta  rutina  contiene  la 
opción  de  deseosa mblaje.  La  línea  700 
llama  la  subrutina  de  activación  de  la 
impresora,  y  luego  inicial  iza  -los  “loops” 
For...  Next  desde  el  principio  hasta  el  final 
de  las  direcciones  de  memoria.  Si  la 
impresora  es  activada,  el  programa  sallará 
a  la  linea  720.  En  caso  contrario,  la  linea 
705  es  ejecutada  y  llamará  a  una  rutina  de 
interrupción  en  la  línea  950  para  compro¬ 
bar  una  condición  de  parada  de  salida. 

El  programa  a  continuación  cargará  el 
valor  desde  la  memoria  y  utilizará  este 
valor  para  apuntar  a  un  elemento  del 
“array"  0%,  Él  elemento  del  “array”  será 
dividido  a  continuación  por  100  para 
apuntar  dentro  del  mnemonico  dentro  del 
lenguaje  "assemblcr”  en  el  “array"  M$. 
El  resultado  se  utilizará  en  la  línea  720 
para  dirigir  el  programa  a  una  subrutina 
correcta  e  imprimir  el  operando  en  el 
modo  de  direcciona miento  requerido  del 
6502/6510.  Estas  subrutinas  están  ubica¬ 
das  desde  la  línea  725  a  la  línea  782, 

Líneas  783-798:  Estas  líneas  contienen 
los  valores  de  datos  utilizados  para  cargar 
el  “array"  y  el  “array"  0%  cuando  d 
programa  se  ejecuta  por  primera  vez. 

Líneas  800-810:  Estas  lineas  contienen 
la  rutina  de  la  opción  de  corrección 
(patch).  En  la  línea  800  empieza  un 
“loop"  For...  Next  desde  la  dirección  de 
principio  hasta  la  dirección  de  final.  A 
continuación  el  programa  llama  la  rutina 
de  conversión  decimal  a  hexadecimal  en  la 
línea  950  e  imprime  la  posición  de  memo¬ 
ria.  La  subrutina  de  entrada  hexadecimal 
es  llamada  en  la  línea  820,  y  los  datos 
introducidos  se  escriben  en  la  posición  de 
memoria  en  la  línea  810. 

Líneas  820-890:  Esta  rutina  introduce 
dos  caracteres  hexadeci males  desde  el 
teclado  y  convierte  su  valor  en  un  número 
decimal.  La  rutina  pone  a  l  un  “flag"  de 
“RETURN”  (R)  si  una  salida  de  esta 
rutina  es  solicitada  pulsando  la  tecla  “X”. 

Lineas  895  #  898:  Esta  ruLina  es  la 
subrutina  de  solicitud  de  interrupción 
llamada  por  las  opciones  de  volcado  y 
desensamblaje  para  comprobar  si  ha 
habido  una  solicitud  de  parada  de  salida. 

Líneas  900-910:  Esta  rutina  contiene  la 
opción  de  volcado.  La  línea  900  llama  la 
subrutina  que  activa  la  impresora,  y  luego 
inicialíza  el  “loop"  For...  Next  para  la 
dirección  de  principio  y  final.  Ei  pro¬ 
grama  luego  comprueba  la  condición  de 
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6B0  I Fk«- -  2 " THENPfl I NT - HÉX^ - j ; GDSUB980  í IFR< \ T HE N G □ 5  U  B 688 : GQSUB690 
6©2  PRIRT : G0TO670 

6BA  E-0J  0-0Í  K*=*  H0-  ;  INPUTK0Í  POHX^LENIK*»  TOISTEP-  l  ¡  ©■£  +  1 
606  E-E  +  VAL  tMIDlfkm,Q, I »  I #2  f ( X- 1 } í NEXTX: GOSUE6S8 : RE T URN 
638  PRrNT-DEC-^íE: RETURN 

690  P4INT-BXN*-! : FORX- ISTOl BTEP- 1 E0-0! I FE - 2 tX >-0Th£NE *E -2 TX : 0- 1 
692  tFX-7THENPR|NT " [SPC J *  1 

694  PRINTR IGHT* ( 5TR*  SQ t , 1 ) t i NEXtX : PR I NTR 1 6HT« ( STR* i £l  , l S ; PETURN 

69*  P^E ¡ PP 1 NT -HEX- ■ | ; GOSU£950 : PR I NT  í  R£  TURN 

690  P-E1NEXTP; PR [NT; RETURN 

700  GOSUE990 ; F0RP- STOE ; I FL  THEN7 1 0 

705  G0SUR393Í IFRTHEN69B 

“10  W=0%<PEEk(P> } :í>[NT  EW^ 100)  : H^U-Z# 1 00! PRINT - [SPC J -  i 121 í "TEPC J"l 

’70  ÜNUGOSUB725,  700 , 733,  7^0( 732, 730, 733, 7*0 , 763, 770 ^  773 , 773 : PR I NT : NEXT : RETURN 

723  PPINT‘« “ í i GOTO700 

733  GOSUB700 ; PR |NT - , X -  * ; RETURN 

740  GO5UB700 1 PR I NT " t Y  * |  ¡ RETURN 

730  GC0UB7S2: PR [NT  h , X * ¡  : PE TURN 

^53  C>O^UB702;  PPTNT- ,  V- t  j  RETURN 

‘‘60  f  =  f»í;0*FíH-P£ekípi  ;  IFM  J  Í27THENF-P- 25* 

76?  F  =P* 1 4HS  PR [NT  H*H |  1GOSUB930: P-0; RETüPN 
■■É3  -  i  -  j  : GQ&U076¡j;  frint  ■  ,  X)  »  |  j PETURN 

PRÍNT"  C  -  I  :  GDSU0780:  PPINT  *  1  ,v¡;  PETURN 
773  PFTVT-A-1 ¡RETURN 

775  *9 1 NT “  » “ I  j 3DSUB7B2 : PR I NT -  I  " |  : Pfi  TUfcN 
700  «  :  t  -  *  -  ¡  ;  p=p  *  [  ;  H-PEEK  (P  J  í  ®CIT 0920 

7S2  PPINT-B-I ;P*F  +  2:N-PEEF  ÍP) : GO5UB900: H-PEEK <P-1 i  ; G0TG92E 

703  DAT A797 (  ADC  ,  AND  t  A&L ,  CN*  ,  EOR ,  L  DA ,  ORA  .  SBC  ,  STA ,  BCC ,  BCS .  BEG  „  B 1 T ,  BM 1 ,  BNE  ,  BPl.  ,  Bflk 
7@4  DATABvt, BV5,CLC,CLB,CLI ,CLVtCPX.CPT , DEC , DEX, DÉV , I«C* 1NX, INV.JHP, JSR,LD>,LDV 
703  DATALSR , NGP , PHA , PHP , PL A , PL^ , ROL, POR, RTI , RTS , SEC , SED , SE  I , STK*  STy, TAX , TAY 
^B6  DATAT5X, T  Y  A , TXS , T  Y  A , 17, 709r  t , ,702,302,  ,39,701 

7P 7  DAT  A3 1  1  b  ,  ,  ,?03 *  303 »  ,  1608 .710,,,,  703 , 303  ,  ,  20 , 707 *  ,  ,  ,  70* ,  306 ,  ,  3305 , 209  ,  ,  ,  1  302 
7BB  DAT A202, 42D2, ,41.201.4211, ,1 303,203,4203, , 1406,210, , , , 203 

739  DAT A4203 ,,4ép 207,  ,  , , 206 , 420* ,  , 44 , 309 *  *  ,  . 502 , 3602 , , 30 , 501 ,3611,, 3205 , 303 , 3603 
790  DATA ,  1606 .310,  ,  ,  , 503 1 3*03,  , 22,507, ,  , , 30*. 3606*  *  43 , 109,  , ,  ,  102,4302,  ,40,  101 

792  DA  T  A4  3 1  I , , 32 1 2 ,  1 03 . 4  303 , , 1900 , 1 1 0 ,  ,  ,  ,  1 03  T 4303 ,,49*107****106,4 306  * , 

793  DAT  A909 ,  ,  , 5002 . 902 *  4902 , , 28 ,  ,54,  , 3005 , 903 , 4903 .  .  1009 , 910,  ,  , 5003 , 903 , 4904 ,  , 36 
^94  DAT A907 . 53 ,  .  , 906 ,  ,  ,  3501 , 609  *  3401  ,  ,  3302 .  602 , 3402 ,,52.601,51,*  3305 , *03 ,  3405 , 

-93  DAT  A 1  t  00 , 6  10,  ,  . 3303 , 603 , 7403 ,  , 23 , 60  7  f  33  * , 3306 , 606 , 3407 , , 2501 , 409 .  ,  , 2302 

796  E AT A402 , 2602 ,  ,31,401*27,, 2303 , 403 , 2603 ,  ,  1 50B  *  410,,,, 403 , 2603  *,21, 407 ,  ,  ,  . 406 

797  DAT A260* , , 2481 , 009 .  ,  , 2402  *  302  *  2902 ,  , 30 , B0 l , 37, , 2405 , B05  *  2903 ,  , 1 200 

798  DAT  A0 10,,,  ,003, 2903 * , 47 * ©07 , ,  ,  , 836,2906, 

E00  FüRF-BTOE:  GOEUB950:PRINT,<  [2SPC1-  |  :hí.-  *:Gd5UB320:  IFRTHEN693 

010  pokep,N£PRInt:next;fíeturn 

020  GETK*¡ IFK*--"THENB20 

830  W^ASC  ÍK*)  :  IFW-B0THENR* | í RETURN 

340  IFU-13ANDLEN<H0) M THEN&^e 

030  t  FW<  48GP  (  W  >  57ANDW  •'  *5  i  ORU  >  70  THEN020 

660  PRINTk*! : GOT0820 

^70  U-A&€iRIGHT*lH**2l > -4B1 1 F V >9THENW»M -7 

S©0  U-W+16Í  H-45C ÍPIGHTtiHt,  1  J  ]  -4B:  I FH > 9 THENH-H - 7 

990  H=H+U; RETURN 

993  GE  TI-*:  IFK*- - -TNENftETURN 

397  JFK*='X^TMENP=| : RETURN 

99©  VAI T 190, 1 TPUKE 19©, 0; RETURN 

900  GOSUB990:  FORP-STDE:  IFlNTí  [P-Sl  *(P-S»  í  HTHENPR I  NT  .*  GflSUB95© 
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Lisiado  i  (continuación) 

«03  IFL*0THENGO3USB95:  rFPTH£Nfc9e 

9 1 0  H-PEEK  t  P  I  ¡  PR  l  M  T  -  l  ZSPC  j  “  I  !  GÜSU0R20  í  NE  X  T  ;  PR  1  Nt  í  RETURN 
920  U- [NT  : H-H-W#!*: GOSUE930: tf-N 

930  U*Wt^e:  IFW>57THEN«>=U*7 
940  PP INTCHR* < V p íí RE fUPN 

930  H*  INT  í  P,r23&i  :  Z-P-H-*23a:  GOSUE920:  H*í;  G0T092® 

***'■*  PP  1 MT  '  5 I  f "  í  J  GOSUB9&0  I  I  Fft  T  HENfíE  TURN 
973  3«E‘f>*INT  H  >  H  | 

9SP  H(i  “:GQSUBB20: l FR T HENRg TuRN 

Ofi3  H  •  ■=  '  f  1 0  '  *rit;  E*Hí  HK«MID*  (H*,LEN  I  H*  r  -  3 , 2  1  :  GÜ5UE670;  E-E  +  H+23*  SPRINT:  R£  TLlRN 

990  L-0lPftINT-5ALlDAf ÍPClAÍEPC]* 

991  INPUT-  IMPRe^ORflíiPC]  i  3 /NI  ,|(P*í  ÍFLÉFTmiP*.  1  l  -  *£  "  T  HENL- 1 :  OPEN4 , 4,0:CMD4 
993  RETl.lRN 


final  de  pantalla,  y  luego  en  la  linea  950 
llama  la  rutina  de  conversión  de  decimal  a 
hexadecimal.  La  línea  905  llama  una 
subrutina  de  solicitud  de  interrupción  en 
la  linea  895  si  una  salida  es  presentada  en 
la  pantalla,  y  luego  se  carga  un  valor 
desde  una  posición  de  memoria  y  luego  se 
llama  la  rutina  de  conversión  decimal  a 
hexadecimal  y  se  imprime  con  la  rutina  en 
la  línea  920, 

Lineas  920-950:  Esta  rutina  convierte 
un  numero  decimal  en  hexadecimal.  Si  se 
entra  en  la  línea  950,  cuatro  caracteres 
hexadeci  males  se  imprimirán.  Si  se  entra 
en  la  Inca  920,  se  imprimirán  dos  caracte¬ 
res  h exa d ec i  males. 


Lineas  970-975:  Esta  rutina  es  la  direc¬ 
ción  de  principio  y  de  final  de  la  rutina  de 
entrada.  El  mensaje  ¿Sí?  se  imprimirá  en 
la  línea  970,  y  luego  el  programa  llamará 
en  la  línea  980  y  985  la  rutina  de  cálculo  de 
conversión  de  dirección  hexadecimal  a 
dirección  decimal. 

La  linea  980  limpia  la  variable  H$,  y 
llama  la  rutina  de  entrada  del  carácter 
hexadecimal  en  la  línea  820  y  luego  eje¬ 
cuta  la  línea  985  para  convertir  el  carácter 
hexadecimal  a  número  decimal. 

Líneas  990-993:  Esta  subrutina  imprime 
el  mensaje  de  salida  a  impresora  y  activa 
la  impresora  cuando  se  contesta  por  un 
Sí  desde  desde  el  teclado. 


Conclusión 

El  programa  “Periscopio”  es  una 
herramienta  útil,  un  monitor  simple  para 
entrar  y  presentar  programas  escritos  en 
lenguaje  máquina.  Su  finalidad  es  la  de 
ayudar  a  los  nuevos  usuarios  del  Comino- 
dore  64  y  de]  VIC-20  para  conocer  mejor 
su  máquina.  Al  mismo  tiempo  propor¬ 
ciona  una  forma  para  entrar  programas 
cortos  escritos  en  código  máquina  del 
6502/6510  en  el  equipo.  Con  este  pro¬ 
grama  funcionando,  y  con  la  “Guía  de 
Referencia  del  Programador"  para  el 
Com modere  64  o  el  VIC-20,  las  formas  de 
trabajar  internas  de  la  máquina  serán 
mucho  más  comprensibles.  ■ 


Para  todos  los  usuarios  de  la  informática  personal 
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Ejemplar  atrasado 
250  pesetas 


Colección  completa 
(6  ejemplares) 

1.250  pesetas 
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DISK-O-VIC 


S 


e  le  contagiará  la  Fiebre 
1  del  Sábado  Noche  con 
este  programa  de  utilidad  que 
proporciona  13  mandatos  re¬ 
lacionados  a  discos  y  hará 
bailar  el  VIC-20  y  la  unidad 
de  discos  1541.  Haz  un 
hueco,  John  Travolta. 


El  Comm odore  VIC-20 
y  La  unidad  de  discos  1 54 1 
constituyen  una  combi- 
nación  muy  importante. 

Por  supuesto,  el  VIC-20 
es  un  ordenador  muy  com¬ 
pleto  basado  en  6502,  que 
ofrece  muchas  caracterís¬ 
ticas  profesionales  como 
un  juego  completo  de  man¬ 
datos  Basic,  un  teclado  pro¬ 
fesional  y  opciones  para  una 
memoria  ampliada* 

A  menudo,  un  sistema  inicial 
Lleva  una  unidad  de  cassette  como 
método  de  almacenamiento  en  gene¬ 
ral,  pero  a  medida  que  asciende  el 
nivel  del  usuario  y  aumenta  la  necesi¬ 
dad  de  un  E/S  más  rápido,  se  hace 
imprescindible  una  unidad  de  discos* 
Igual  que  las  demás  unidades  de  dis¬ 
cos  flexibles  de  Commodore,  La  uní- 


VIC-20 

1514  Disk  Drive 
Ecfitor/assemblcr  o 
machine  languaje 


dad  1541  es  inteligente.  Esto  significa 
que  por  separado  La  unidad  1 54 1  es  un 
ordenador  capaz  de  realizar  muchas 
funciones  sin  la  intervención  del  sis¬ 
tema  principal* 

De  hecho.  La  1541  contiene  su  pro¬ 
pio  microprocesador,  un  par  de  VI  As 
(adaptadores  de  interface  versátiles), 
2 K  de  RAM  y  un  sistema  de  opera¬ 
ciones  completo  en  ROM.  Esto  con¬ 


duce  a  dos  hechos 
i  m  p  o  rt  antes.  P  ri  m  e  ro , 
dado  que  el  sistema 
de  la  1541  resulta  tan 
completo,  no  nece¬ 
sita  robar  RAM  del 
programa  del  usuario 
del  sistema  principal* 
Al  contrario  de  muchas 
combinaciones  de  uni¬ 
dad  de  discos/ordena¬ 
dor,  el  VIC-20  dispone  de 
ia  misma  cantidad  de  espa¬ 
cio  de  programa  con  o  sin  la 
unidad  de  discos. 

Segundo,  dado  que  la  1541  es  inte¬ 
ligente,  puede  ser  programada  exter¬ 
namente  para  que  realice  muchas  fun¬ 
ciones  útiles.  Realmente,  la  unidad  no 
tiene  límites  fijos  en  el  sentido  de  que 
si  una  función  determinada  no  existe 
de  antemano  dentro  del  sistema  ope¬ 
rativo  de  discos,  se  puede  escribir  un 
programa  para  generar  tal  función. 

disk-o-vic 

Este  articulo  describe  un  paquete 
de  utilidad  que  se  llama  DISK-O- 
VIC,  que  añade  trece  comandos  nue- 


vas  relacionados  con  discos  al  VIC¬ 
IO.  Dichos  comandos  formarán  parte 
del  Basic  y  pueden  ser  utilizados  en  la 
modalidad  inmediata  para  simplificar 
las  operaciones  rutinarias  con  la  uni¬ 
dad  de  discos.  Algunos  de  los  coman¬ 
dos.  como  DLOAD  y  DSAVE,  son 
ampliaciones  de  comandos  Basic, 
Otros,  como  “Screatch"  y  "Retíame", 
se  utilizan  para  mantener  los  discos 
limpios  y  en  orden.  Finalmente,  otro 
grupo  añade  características  como  lis¬ 
tados  de  mensajes  de  error,  represen¬ 
tación  del  directorio,  etc. 

El  paquete  de  utilidad  DISK-O- 
VIC  está  escrito  en  lenguaje  máquina 
para  que  sea  más  rápido  y  más  flexi¬ 
ble,  Después  de  cargarse  e  inicial  i- 
zarse  puede  quedarse  allí  durante 
toda  una  sesión  de  programación. 
Debido  a  la  característica  especial  de 
carga  (detallada  más  adelante),  DISK- 
O-VIC  se  sitúa  al  principio  de  la 
memoria  y  quedará  libre  de  interfe¬ 
rencia  del  programa  Basic,  De  esta 
forma,  se  añaden  trece  nuevos  coman¬ 
dos  sin  afectar  al  sistema  operativo 
normal. 

La  característica  especial  de  carga 
también  hace  posible  el  uso  de  este 
paquete  en  un  VI 020  sea  cual  sea  la 
cantidad  de  memoria  adicional.  No  se 
vuelve  anticuado  aunque  más  ade¬ 
lante  se  añada  una  memoria  adicio¬ 
nal.  Después  de  instalarse  e  i  11  i  c  i  a  I  i  - 
zarsc,  la  DISK-Ü-VIC  consume  980 
bvtes  y  deja  intacta  la  página  cero. 

Trece  Comandos  Nuevos  en  Disco 

Antes  de  entrar  en  detalles  sobre  la 
manera  de  operación  de  la  DISK-O 
VIC,  examinaremos  los  nuevos  co¬ 
mandos  para  saber  exactamente  lo 
que  hacen.  (Para  más  detalles,  vea  la 
tabla  de  comandos). 

Cada  vez  que  un  disco  flexible  se 
introduce  en  la  1541  y  para  luego 
tener  acceso  a  dicho  disco,  se  crea  una 
tabla  especial,  llamada  el  mapa  de 
disponibilidad  de  bloques,  en  la 
memoria  de  la  unidad.  Esta  tabla  con¬ 
tiene  información  especial  sobre  el 
disco  que  se  encuentra  en  la  unidad  en 
un  momento  dado,  como,  por  ejem¬ 
plo,  la  forma  en  que  se  ha  realizado  la 
partición  del  disco,  los  bloques  que  se 
encuentran  libres  y  otros  asuntos  de 
asignación.  Afortunadamente,  la  uni¬ 
dad  de  discos  se  encarga  de  esta 
información  un  tanto  esotérica,  de 
forma  que  vd.  se  tendrá  que  preocu¬ 
par  pocas  veces  por  ella* 

El  proceso  de  crear  esta  tabla  se 
llama  inicialización*  Un  disco  tiene 
que  ínicializarse  para  que  se  escriba  y 
se  lea  de  forma  correcta.  (Tenga  en 
cuenta  que  unos  sistemas  de  unidad 
de  discos  que  no  son  de  Commodore 
utilizan  el  término  inicialización  para 
indicar  "dar  formato  al  disco",  un 
proceso  que  puede  escribir  encima  de 


Lisiado  i.  DISK-O-VIC ,  un  programa  de  utilidad  en  disco  para  el  VIC- 20. 

Nota:  Este  programa  utiliza  el  lenguaje  ensamblador;  se  necesita  un  editor / 

ensamblador  para  ejecutarlo . 
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00012 
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00013 
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00014 

oooo 
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OOO  í  5 
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PARPTR 

=  *0B 

PUNTERO  DÉ  ANALIZADOR 

OO016 

oooo 

PQ1NÍR 

=>  *22 

PUNTERO  DE  PROGRAMA  DE  UTILIDAD  DEL  VIC  20 

00017 

oooo 

BASIC 

=  *2B 

COMIENZO  DE  PUNTERO  DE  BASIC 

O0OÍ8 

0000 

VARBLE 

-  *20 

.COMIENZO  DÉ  PUNTERO  DE  VARIABLES 

OO0 19 

oooo 

CHRGET 

=  *73 

RUTINA  CHRGET  EN  BASIC 

00020 

oooo 

CURCO 1 

=  *79 

RE  GET'  CARACTER  ANTERIOR 

00021 

oooo 

CHRP  TR 

=  *7A 

PUNTERO  CHRGET 

00022 

oooo 

WEDGE 

=  *7E 

BIFURCACION  CHHGET  DE  BASIC 

00023 

oooo 

57 

=  *90 

.UNEA  DE  ESTADO  'ST' 

00024 

0000 

CHRM05 

=  *B7 

NUMERO  DE  CARACTERES  EN  NOMBRE 

00025 

oooo 

DE VI CE 

=<  *BA 

DISPOSITIVO  ACTUAL 

00026 

oooo 

UTILPT 

=  *FB 

PUNTERO  DÉ  PROGRAMA  DE  UTILIDAD  DISK  0  VIC 

00027 

Oúi  10 

F  IftCHft 

-  *FD 

.SALVAR  PROVISIONALMENTE  PARA  CATALOGO 

0002B 

oooo 

5ECCHR 

-  *FE 

SALVAR  PROVISIONALMENTE  PARA  CATALOGO 

00029 

oooo 

5  T  A0>. 

*  *0100 

■STACK  DEL  SISTEMA 

00030 

oooo 

BUFFER 

s  *0200 

ALMACENAMIENTO  INTERMEDIO  DE  ENTRADA 

00031 

oooo 

CHDBUF 

=  *033C 

ALMACEN AM  INTERM  DE  COMANDOS  EN  DISCO 

00032 

oooo 

flag 

=  CNDBUF 

DISTINTIVO  PARA  CATALOGO 

00033 

oooo 

WARH8T 

^  *C474 

REARRANQUE  DEL  BASIC 

00034 

oooo 

WAIT 

=  *C48C 

ESPERAR  COMANDO  DE  SALIDA 

00035 

oooo 

INF  L  N 

=  *C49F 

TERMINAR  INTRODUCIR  LINEA 

0OO36 

0000 

CHAIN 

«  *C533 

RECONSTRUIR  SERIÉ  DE  LINEAS  EN  BASIC 

00037 

oooo 

CLP 

=  *C659 

AJUSTAR  PUNTEROS.  RESTAURAR  BASIC 

OOO30 

0000 

1NTEGP 

*  *C96B 

RECOGER  ENTRADA  DE  ENTEROS 

OO039 

oooo 

P5TPNG 

■  *CF 1 E 

.IMPRIMIR  SERIE  SEÑALADA  POR  |A,Y¡ 

00040 

oooo 

ERROR 

-  *CF08 

.RUTINA  DE  ERROR  DE  SINTAXIS 

00041 

oooo 

PRCINE 

■  *DDCD 

IMPRIMIR  NUMERO  DELINEA 

OO042 

oooo 

CHROUT 

=  *E  742 

.REPRESENTAR  EN  PANTALLA 

0OO4  3 

oooo 

RESE  T 

=  *FD22 

.ARRANQUE  DEL  VIC  20 

00044 

oooo 

SECLIS 

=  *FF93 

SECUNDARIO  DESPUES  DE  ESCUCHAR 

00045 

oooo 

TKSA 

=  *FF96 

SECUNDARIO  DESPUES  DE  HABLAR 

00046 

OOOO 

ACPTR 

=  *FFA5 

ACEPTAR  DATOS  DÉ  RS  232 

00047 

oooo 

CIQUT 

=  *FFAB 

BYTE  DE  SALIDA  A  RS  232 

00048 

oooo 

UNTALK 

*  *FFAB 

DESCONECTA  EL  PERIFERICO 

00049 

0000 

UNL1ST 

*=  *FFAE 

DESCONECTA  EL  PERIFERICO 

O0O5O 

OOGO 

L ISTEN 

-  tFFBÍ 

ORDENAR  DISPOSITIVO  QUE  HABLE 

0005 1 
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=  *FFE»A 

FUAR  FICHERO  LOGICO 
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SE  ÍNAM 
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oooo 
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datos  o  destruirlos.  Esto  no  es  el  caso 
con  la  unidad  de  disco  1541), 

Para  asegurarse  de  que  la  informa¬ 
ción  contenida  en  la  memoria  de  la 
unidad  esté  actualizada,  el  disco  se 
debe  de  i  metalizar  con  frecuencia 
durante  una  sesión.  Según  sale  de  la 
fábrica,  la  1541  normalmente  realiza 
el  proceso  de  auto-inicialización  du¬ 
rante  la  ejecución  de  varios  coman¬ 


dos,  Con  la  finalidad  de  tener  un 
margen  de  seguridad,  un  proceso 
automático  de  ¡nicialización  precede 
cada  mandato  en  DISK-O-VIC,  Aun¬ 
que  esto  parezca  un  poco  excesivo,  el 
proceso  sólo  tarda  un  segundo  y 
ayuda  enormemente  a  reducir  el 
número  de  problemas.  Nunca  hace 
daño  inicializarse  de  sobra. 

Los  comandos  DLOAD  y  DSAVE 


funcionan  exactamente  igual  que  los 
comandos  "‘Load*4  y  “Save”  del  VIC- 
20,  sólo  que  el  ordenador  sabe  auto¬ 
máticamente  que  el  dispositivo  co¬ 
rrecto  para  tener  acceso  es  la  unidad 
de  disco  (dispositivo  número  ocho). 
Estos  comandos  solamente  se  desti¬ 
nan  a  programas  Basic. 

Nunca  se  deben  usar  los  comandos 
DLOAD  o  DSAVE  en  programas  de 


Tabla  /.  Explicación  de  los  comandos  de 
DISK-O-VIC 

"A PPEND''  (Agregar),  Este  comando  per¬ 
mite  que  un  programa  que  se  encuentra  en 
disco  se  agregue  al  final  de  otro  en  la  memo¬ 
ria.  Para  que  esto  no  se  complique  dema¬ 
siado  para  el  VIC-20,  es  importante  que  el 
programa  en  la  memoria  tenga  los  números 
de  línea  menores  que  los  que  tiene  el  pro¬ 
grama  en  disco  que  se  agrega.  La  disponibi¬ 
lidad  de  este  comando  facilita  la  construc¬ 
ción  de  grandes  bibliotecas  de  subrutinas  a 
partir  de  las  cuales  se  pueden  construir  pro¬ 
gramas  completos.  La  sintaxis  correcta  es: 
APPLND  “titulo  de  programa"  (retorno) 

Igual  que  ocurre  con  el  Basic  normal  del 
VlC-20,  se  pueden  abreviar  algunas  pala¬ 
bras.  Por  ejemplo,  en  ve/  de  teclear  la  pala¬ 
bra  completa  APPLND.  se  puede  teclear 
“A  shift-P".  (Todos  los  comandos  DISK-O- 
VÍC  se  pueden  abreviar  de  esta  forma.  Sim¬ 
plemente  se  teclea  la  primera  letra  del 
comando,  seguida  por  la  segunda  letra  en 
"sbift"), 

CATA LOG  (Catalogar).  Para  saber  lo  que 
contiene  el  disco  que  se  encuentra  actual¬ 
mente  en  la  unidad  de  disco,  se  mecanogra¬ 
fía  CATALOG  y  se  pulsa  Ea  tecla  de 
retorno.  Un  listado  de  directorio  se  imprime 
en  la  pantalla  demostrando  lodos  los  pro¬ 
gramas  disponibles.  Hay  que  tener  en 
cuenta  que,  a  diferencia  del  método 
empicado  normalmente  por  la  1541  para 
consultar  el  directorio,  CATALOG  no 
molesta  el  programa  que  se  encuentra  en  Ea 
memoria  dei  VlC-20. 

Se  lia  agregado  una  característica  especial 
de  hacer  una  pausa,  para  que  resulte  más 
fácil.  Se  pulsa  la  barra  de  espaciado  una  vez 
para  hacer  una  pausa  en  el  lisiado.  Se  vuelve 
a  pulsar  para  continuar.  También  se  puede 
pulsar  la  tecla  "run/stop"  para  parar  un  lis¬ 
tado. 

CQLLECT  (Recoger),  Si  se  mecanografía 
este  comando  y  se  pulsa  la  tecla  de  retorno, 
el  disco  que  se  encuentra  en  la  unidad  será 
validado  o  recogido.  En  términos  sencillos, 
esto  hace  que  la  unidad  busque  por  todo  el 
disco,  comprobando  que  lodos  los  bloques 
se  han  “conectado"  correctamente.  Cual¬ 
quier  bloque  que  ha  sido  asignado  de  forma 
incorrecta  será  despejado  y  preparado  para 
servir  de  almacenamiento.  La  operación 
completa  de  este  eo mando  es  bastante  com¬ 
pleja,  pero  fundamentalmente  lo  que  hace 
es  revisar  y  despejar  el  disco.  Igual  que  la 
operación  de  inicia lización.  nunca  hace 
daño  realizar  el  comando  “CoJIect"  con  fre¬ 
cuencia. 

DLOAD.  Esto  funciona  igual  que  el 
comando  normal  de  LOAD  pero  remite  el 
fallo  automáticamente  a  la  unidad  de  dis¬ 
cos.  Por  ejemplo,  se  mecanografía  el  “nom¬ 
bre  del  programa"  DLOAD  y  se  pulsa  la 
tecla  de  retorno.  La  unidad  se  inicial  iza 
automáticamente,  y  se  comprueban  ci  pro¬ 
grama  cargado  y  los  errores  de  disco.  Para 
poner  esto  en  perspectiva  podemos  deeir 
que  DLOAD  es  equivalente  a  los  siguientes 
pasos: 


OPEN  I,  ST  15,  “I" 

LOAD  "program  ñame",  N 
INPUTtíl  disk  error  message,  etc, 

GLOSE  1 

Es  evidente  que  aunque  DLOAD  es  un 
comando  simple,  real  i/a  mucho,  Además, 
DLOAD  sólo  puede  ser  utilizado  en  pro¬ 
gramas  Basic  o  programas  de  lenguaje  de 
máquina  que  se  "parecen”  a  Basic.  Esta 
limitación  se  debe  al  hecho  deque  el  VIC-20 
tiene  un  extremo  formado  de  carga  de 
“memoria  deslizante",  (sliding  memory) 

DSAVE.  Esto  es  igual  que  DLOAD  pero 
salva  el  programa  Basic  en  disco.  Se  reali¬ 
zan  las  mismas  operaciones  de  ¡nicialización 
y  detección  de  errores. 

HEADER.  Esto  es  un  comando  especial  que 
da  formato  a  un  disco  virgen  para  su  uso 
posterior.  Se  imprimen  marcas  magnéticas 
en  el  diseo  que  sirven  de  guía  al  1541,  y  se 
asignan  un  titulo  y  un  código  de  identifica¬ 
ción  al  disco.  La  sintaxis  para  su  uso  es  la 
siguiente: 

HEADER.  "nombre  del  disco".  Ixx  (return) 
donde  “nombre  del  disco"  es  el  nombre 
asignado  al  disco,  ”x\"  se  utiliza  aqui  como 
el  código  de  identificación.  Sin  embargo,  se 
puede  utilizar  cualquier  combinación  de  dos 
caracteres.  Tenga  en  cuenta  que  la  coma  es 
necesaria,  igual  que  la  letra  "I",  Antes  de 
realizar  un  comando  HEADER  en  el  disco, 
se  imprime  la  pregunta  "Estás  seguro? 
(Sí/No)"  en  la  pantalla.  Una  respuesta  de 
**S"  (SI)  inicia  el  comando;  cualquier  otra 
respuesta  cancela  anormalmente  el  proceso. 
Dado  que  el  comando  HEADER  escribe 
encima  del  disco,  es  importante  proporcio¬ 
nar  esta  característica  de  "Estas  seguro?". 

INIT.  Como  hemos  indicado  antes,  cada 
comando  de  DISK-O-VIC  incorpora  la 
operación  de  i  nicialización  automática.  Sin 
embargo,  hay  ocasiones  en  que  un  disco 
está  causando  problemas  y  resulta  necesario 
forzar  un  proceso  de  micializaeión.  Para 
hacer  esto,  se  mecanografía  INI T,  se  pulsa 
la  tecla  retorno  y  el  disco  será  inicia lizado. 
Este  comando  es  igual  que  teclear: 

OREN  I,  H.  15.  "I” 

GLOSE  \ 

KILL .  Este  es  un  comando  de  auto- 
destrucción.  Si  vd.  se  ha  hartado  de  utilizar 
DlSK-O-ViC  durante  una  sesión  de  pro¬ 
gramación  y  quiere  eliminarlo  totalmente 
del  ordenador,  teclee  KILL  y  pulsa  la  tecla 
de  retorno.  El  ordenador  ejecutará  un  pro¬ 
ceso  entero  de  restauración,  comportándose 
como  si  se  hubiera  apagado  y  vuelto  a 
encenderse.  No  confunda  este  comando  eon 
el  de  "OH  "  (a  continuación).  Kll  !  res¬ 
taura  el  ordenador  totalmente.  En  general, 
utilice  este  comando  solamente  cuando 
quiere  provocar  un  arranque, 

OEF.  Este  comando  apaga  DISK-O-VIC, 
pero  sigue  dentro  de  la  memoria,  a  salvo  y 
protegido.  Asi  puede  volver  a  usarse  en 
cualquier  momento.  Dado  que  DISK-O- 


V1C  reduce  un  poco  la  velocidad  de  Basic, 
se  puede  apagar  cuando  se  ejecuta  un  pro¬ 
grama  para  poder  alcanzar  la  máxima  velo¬ 
cidad.  Para  volver  a  usarlo  se  teclea: 

SYS  256 * PEEK( 56)+  PEER (55 )  t return) 

RE  NA  ME.  Este  comando  vuelve  a  nombrar 
un  programa  en  disco,  sin  afectar  ningún 
programa  que  se  encuentre  en  la  memoria. 
Por  ejemplo, 

R  EN  AME  "nombre  antiguo”  TO  "nombre 
nuevo"  (return) 

cambiará  el  nombre  del  programa  al  "nom¬ 
bre  nuevo”.  Hay  que  tener  en  cuenta  varias 
cosas.  El  nombre  antiguo  viene  primero.  y 
luego  el  nuevo.  Ja  palabra  ’  I  O"  tiene  qué 
estar  presente  entre  los  dos  nombres  para 
que  funcione  el  comando.  Finalmente,  se 
proporciona  una  facilidad  de  detección  de 
errores  para  que  resulte  imposible  volver  a 
nombrar  un  fichero  coh  un  nombre  que  se 
está  utilizando. 

SCRATCH.  Con  este  comando  se  puede 
borrar  (SC  RAI  CH)  un  fichero  o  programa 
del  disco.  Se  mecanografía  SCRAICH 
seguido  deí  nombre  del  fichero,  y  se  pulsa  la 
tecla  de  retorno.  Una  vez  más,  sé  presenta  la 
p  r  eg  unta  "  Est  ás  segu  re  i?  ( Y/N  f  ■  Se  bo  rra 
el  fichero  si  se  recibe  la  respuesta  "Y”. 

SENO  (Enviar),  Este  es  un  comando  de 
fines  generales  y  se  puede  utilizar  para 
enviar  los  comandos  en  diseo  estandart!  de 
Commodore  a  la  unidad.  Por  ejemplo, 
SEND  "I"  (return) 

enviará  la  letra  I  al  disco,  así  provocando 
una  iniciali/ación.  (Por  supuesto,  el  comando 
INI!,  de  UlSk-O-VlC.  realiza  la  misma 
función).  Otro  ejemplo. 

SEND  "R:  nombre  nuevo  =  nombre  anti¬ 
guo"  (return) 

hará  que  se  vuelva  a  nombrar  el  fichero 
“nombre  antiguo".  Dado  que  otros  coman¬ 
dos  en  DISK-O-VIC  sirven  para  casi  lodo, 
el  comando  SEND  no  se  utiliza  mucho, 
Pero  resulta  útil  tenerlo  a  mano  para  las 
operaciones  más  avanzadas  de  programa¬ 
ción  en  disco.  Para  que  se  sepa.  Svnd  es 
equivalente  a 

OPEN  L  8.  15.  "eommand" 

GLOSE  I 

STATUS  (Estado),  Este  comando  busca  la 
causa  de  un  detecto  en  la  operación  de 
disco.  Si  se  enciende  la  lu/  roja  de  detección 
de  errores  en  la  unidad  de  discos,  se  teclea 
S  1  A  I  US  y  se  pulsa  la  tecla  de  retorno.  Se 
apaga  la  luz  y  un  mensaje  de  error  se 
imprime  en  lu  pantalla.  El  mensaje  describe 
el  error  y  donde  se  encuentra  el  problema  en 
el  disco  (en  términos  de  pista  v  sector).  Si 
no  hay  ningún  problema  no  se  imprime 
ningún  mensaje.  Para  comprobar  este 
comando,  teclee  lo  siguiente; 

UPEN  I.  B.  1,  "BASURA"  (return) 

La  unidad  3  541  empezará  a  funcionar.  y 
suponiendo  que  no  existe  ningún  fichero 
nombrado  "BASUR  A"  en  el  diseo,  la  luz  de 
errores  se  debe  de  encender.  Teclee  S T A- 
E  US.  y  el  mensaje  de  error  se  imprimirá  en 
Ja  pantalla.  Vea  el  manual  para  la  unidad  de 
discos  1541  para  consultar  una  explicación 
completa  de  los  mensajes  de  error. 
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TENEMOS  PROGRAMAS 
MUY  INTERESANTES 
PARA  SU  COMMODORE  64 

por  ejemplo ... 


CONTABILIDAD 

Ideado  y  realizado  de  acuerdo 
con  el  Plan  General  Contable 
español. 

Con  una  capacidad  de: 

300  cuentas  y  3000  apuntes 
por  diskette.  ¡ 

Se  incluye  MANUAL  DE  USUA¬ 
RIO  con  nociones  fundamentales 
de  contabilidad  y  Plan  General 
Contable  Español. 

GESTION  STOCK 

Un  extraordinario  control  de 
almacén. 

Hasta  1000  artículos  y 

1400  apuntes  por  diskette. 

Salidas  por  pantalla  e  impre¬ 
sora.  Inventarios.  Tarifas  de 
precios.  Listado  de  artículos 
bajo  mínimo.  Listado  total  o 
parcial,  del  fichero.  Cierre 
periódico.  Copias  de  seguri¬ 
dad.  Detallado  manual. 

7 

BASE  DE  DATOS 


Diseñe  su  propio  fichero  solo  de  acuerdo  con  sus  necesidades 
Número  de  registros  variable,  íej.:  5Ü0G  de  30  caracteres]. 
Salidas  por  pantalla  o  impresora.  Búsqueda  por  campos.  '  • 
Listado  total  o  selectivo.  Copias  de  seguridad,  etc. 


*  *  A 

Esto  es  una  simple  exposición  de  algunos  de  nuestros  programas. 
Si  no  está  “su  ”  programa  en  este  anuncio,  o  si  desea 
más  información,  solicítela  a: 

*  o 


EAF 


| 


siniHis  t@i 


ü  Sipfe  eüíIí-  4- 


::  Hrül 


i  : 


consejo  de  ciento,  563-565  barcelona-13 
telefono  93-23195  87  apdo.  24.143 


lenguaje  de  máquina  o  híbridos,  dado 
que  los  comandos  llegan  a  unas  con- 
el us iones  sobre  el  comienzo  de  espa¬ 
cio  de  1  programa  que  pueden  o  no  ser 
ciertas  para  programas  de  lenguaje  de 
máquina.  En  general,  todos  los 
comandos  de  D1SK-Ü-V1C  dan  por 
hecho  que  se  trabaja  en  Basic. 

Los  comandos  DLOAD  y  DSAVE 
automáticamente  comprueban  el  canal 
de  errores  una  vez  realizada  una  ope¬ 
ración  para  ver  si  todo  ha  salido  bien. 
Si  se  detecta  un  error  (Unidad  No 
Preparada,  Fichero  Existe,  Fichero 
No  E  neón  irado,  etc.),  el  mensaje  se 
imprime  en  la  pantalla  y  el  fichero  se 
cierra. 

"Catálogo"  constituye  un  comando 
interesante.  Al  contrario  de  cómo  se 
hacían  las  cosas  antes,  se  puede 
imprimir  el  directorio  de  discos  o 
catálogo  directamente  en  la  pantalla, 
así  conservando  cualquier  programa 
en  la  memoria.  Para  concluir  la  repre¬ 
sentación  del  listado  en  la  pantalla,  la 
barra  de  espaciado  se  pulsa  una  vez; 
para  volverá  iniciar  la  representación 
del  listado,  la  barra  de  espaciado  se 
vuelve  a  pulsar. 

La  finalidad  del  resto  de  los 
comandos  debe  ser  evidente.  Ln  caso 
contrario  sería  útil  repasar  la  Tabla  l 
y  consultar  el  manual  de  La  unidad  de 
discos  1541  de  vez  en  cuando.  Los 
usuarios  de  los  ordenadores  Com mo¬ 
dere  más  grandes  (y  más  caros)  pro¬ 
bablemente  conocerán  muchos  de  los 
comandos.  A  diferencia  del  V1C-20, 
ordenadores  como  el  PET  y  SUPE:R- 
PET  ya  disponen  de  un  juego  de 
comandos  un  disco  que  se  parece 
mucho  a  los  de  la  DISK-O-VIC. 

Cómo  Funciona  el  Programa 

Ahora  que  DISK-O-VIC  se  ha  pre¬ 
sentado,  vamos  a  ver  cómo  funciona. 
Para  que  sea  de  más  fácil  compren¬ 
sión,  el  Listado  1  presenta  un  listado 
de  ensamblador  para  el  programa 
completo.  Dado  que  los  ensamblado¬ 
res  empiezan  a  ser  más  comunes  para 
el  VI 020,  a  lo  mejor  vd.  prefiere 
introducir  el  código  fuente  y  ensam¬ 
blar*  su  propia  versión.  Pero  el  lis¬ 
tado  de  ensamblador  se  presenta  aquí 
dado  su  valor  didáctico,  y  la  mayoría 
de  los  usuarios  seguramente  prefieren 
introducir  el  código  objeto  directa¬ 
mente.  Se  presenta  un  volcado  hexa- 
decimal  de  dicho  código  en  el  Lis¬ 
tado  2. 

Probablemente  muchos  problemas 
complicados  se  pueden  resolver  estu¬ 
diando  los  comentarios  en  este  lis¬ 
tado.  Sin  embargo,  para  que  sirva  de 
ayuda  en  comprenderlo,  describiré  la 
estructura  básica  del  programa.  Para 
poder  hacerlo,  tenemos  que  estudiar 
la  forma  en  que  Basic  recoge  y  ejecuta 
un  comando. 

Cuando  actúa  el  Basic  interpreta¬ 
tivo,  un  puntero  tiene  que  buscar  los 
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INICIAR  CONVERSACION 
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.OBTENER  UN  CARACTER 
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COMPROBAR  EL  ST 
.BIFURCAR  SI  VAN  MAL 
OBTENER  SIGUIENTE  CARACTER 
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VOLVER  A  COMPROBAR 
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!  »  **  EN  TRAPA  D  E  COMA  NDG  R  É  COG  E  R 


COLLEC  JSR  CC MD 

JHP  MÑfttfST 


REALIZAR  RECOGIDA 
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***  ENTRADA  DE  COMANDO  DLOAD 
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JSR  SETDIS 
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CAMBIAR  POSICION  DE  CARGA 
A  ESTE  PUNTERO 
REALIZAR  LA  CARGA 
VOLVER  A  CONSTRUIR  LA  SERIE 
r AJUSTAR  COMIENZO  DE  VARIABLES 
PARA  OUE  APUNTE  JUSTO  DESPUES  DÉ 
LOS  TRES  BYTES  DE  CERO  AL 
FINAL  DEL  PROGRAMA 


DESPEJAR  TODOS  LOS  PUNTEROS  ETC 
; IR  A  DESPEJAR  AL  FICHERO 


***  -ENTRADA  OE  MANDATO  DSAVE 


JSF?  PARAH5 
JSR  5ETD1S 
LDA  BASIC 
STA  UTILPT 
LDA  BASIC* i 
STA  UTILPT+1 
LDA  #< UT I LPT 
LDX  VARBLE 
LDY  VA6BLE+1 
JSR  SAVE 
JSR  SHUT 
JSR  DERROR 
JHP  WA8HST 


OBTENER  NOMBRE  DE  PROGRAMA 
FIJAR  PAHAMETRGS  DE  DISCOS 
.SEÑALAR  "UTILPT  AL 
.PRINCIPIO  DE  PROGRAMA 


PAGINA  EN  DIRECCION  DE  UTILPT 
REALIZAR  O  X  E  ¥  CONTIENEN  FIN 
DE  DIRECCION  DE  PROGRAMA 
.SALVAR  EN  DISCO 
CERRAR  EL  FICHERO 
COMPROBAR  ERRORES  EN  DISCO 
TODO  HECHO 


;*#«  ENTRADA  DE  COMANDO  "NEADER  *** 


PREPARAR  COMANDO 


comandas  analizando  o  barriendo  la 
línea  de  eiurada.  El  intérprete  revisa 
la  línea  de  entrada,  carácter  por 
carácter,  en  búsqueda  de  un  comando 
que  reconoce.  Por  lo  tanto,  para  aña- 
dir  comandos  nuevos  al  Basic  hay  que 
colocar  una  bifurcación  en  la  rutina 
del  análisis,  desviando  la  atención  del 
procedimiento  normal  del  barrido  a 
un  procedimiento  nuevo.  Realmente 
lo  que  ocurre  es  que  el  analizador  está 
obligado  a  buscar  primero  los  coman¬ 
dos  nuevos.  Si  no  puede  comparar  un 
comando  con  ninguno  de  la  lista 
nueva,  se  vuelve  a  enviar  ei  control  ai 
sistema  normal  donde  el  comando  de 
entrada  se  comprueba  contra  la  lista 
antigua. 

El  primer  bloque  de  código  del  Lis¬ 
tado  1,  las  líneas  00072-00080,  es  la 
rutina  de  i  nidal  izado  n.  Este  código 
introduce  bifurcación  en  la  rutina 
normal  de  análisis,  y  de  esta  forma  el 
proceso  de  inicia  1  izado n  sólo  tiene 
que  tener  lugar  al  principio  de  la 
sesión.  Después  del  proceso  de  i  meta¬ 
lización,  el  analizador  Basic  siempre 
busca  primero  los  comandos, 

DISK-O-VIC 

El  siguiente  bloque  de  código  se 
sitúa  en  las  líneas  00086-00165.  Esto 
es  un  suplemento  del  analizador. 
Como  hemos  indicado  antes,  el  anali¬ 
zador  se  dirige  a  esta  rutina  cada  vez 
que  un  comando  entra  en  el  ordena¬ 
dor.  La  instrucción  clave  en  este  blo¬ 
que  se  encuentra  en  la  línea  00 100.  Ei 
"stack”  se  analiza  por  si  incluye 
alguna  dirección  de  “Return”  (“RTS”). 
Si  la  dirección  al  principio  del  “stack” 
índica  que  el  analizador  procede  del 
estado  de  “esperando  un  mandato" 
del  VIC-20,  sí  inicia  la  acción.  Si  se 
encuentra  alguna  otra  dirección,  el 
analizador  puede  continuar  con  sus 
actividades  normales. 

Suponiendo  que  ¡a  prueba  se  ha 
concluido  con  éxito  y  el  VIC-20  real¬ 
mente  espera  un  comando,  la  línea  de 
entrada  se  verifica  carácter  por  carác¬ 
ter.  Esto  ocurre  en  el  bloque  de 
código  etiquetado  “Rutina  de  Análi¬ 
sis”,  que  se  encuentra  en  las  líneas 
001 19-00150.  La  entrada  se  com¬ 
prueba  contra  la  lista  de  comandos 
DISK-O-VIC  localizada  en  una  tabla 
en  las  líneas  00573-00586.  Si  se 
encuentran  dos  iguales,  se  forma  una 
“dirección  de  acción”,  y  el  control 
pasa  a  la  subruiina  correspondiente. 

Subrutinas 

La  mayor  parte  del  programa  se 
destina  a  las  numerosas  su b rutinas  de 
comandos.  Para  que  sean  más  fáciles 
de  encontrar,  estas  subrutinas  se  clasi¬ 
fican  en  orden  alfabético,  empezando 
por  “Append”,  luego  “Catálogo”, 
etc.  Aunque  en  este  momento  el  pro¬ 
grama  parezca  complejo,  la  verdad  es 
que  resulta  bastante  fácil  de  analizar 
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.TIENE  QUE  TENER  1 

00305 

1  190 

DO 

22 

BNE 

BAO  1 

0030* 

1  L9A 

20 

73 

OO 

JSR 

CHR0ET 

.OBTENER  NUMERO  DÉ  IDENTIDAD 

00307 

L  19D 

FO 

ID 

BE  O 

BADI 

.MAL.  SI  NO  SE  ENCUENTRA  ALLI 

00300 

í  19F 

90 

3C 

03 

STA 

CMDBUf , X 

SALVAR  PRIMER  DIGITO 

00309 

1  t  A2 

E-  H 

[NX 

00310 

1  1A3 

20 

73 

OO 

JSR 

CHRGET 

RECOGER  SIGUIENTE  DIGITO 

0031  1 

1  1  A* 

F0 

14 

SED 

BAO  1 

.MAL.  SI  NO  SE  ENCUENTRA  ALLI 

00312 

í  i  AS 

9D 

3C 

03 

STA 

CttDBÜF , X 

SALVAR  SEGUNDO  DIGITO 

00313 

1  1AB 

E0 

INI 

00314 

1  1  AC 

*20 

73 

00 

JSR 

CHRGET 

CARACTERES  EXTRAÑOS' 

00315 

i  1  Aí1 

DO 

OB 

0NE 

BAO  l 

,SL  MALAS  NOTICIAS 

0031* 

L1B1 

90 

3C 

03 

STA 

CMDBUF , x 

CERO  SIGNIFICA  FIN 

00317 

1  184 

20 

Of 

1  3 

JSR 

5URE 

ESTAS  SEGURO' 

003  LO 

1107 

DO 

09 

BNE 

NDSO 

NINGUN  CERO  SIGNIFICA  NO 

003  L  9 

1  109 

4C 

32 

17 

XP11  r 

.SI.  REALIZA  HEADER 

00320 

1  1BC 

4C 

08 

CF 

BADI 

JMP 

ERROR 

00321 

1  t  BF 

t 

00322 

I  1  BF 

1 

00323 

1  J  fft 

|  *** 

.  E N TRAGA  QE  COMANDO  i N 1 C 1  ALIZAR  *  *  * 

00324 

1  IB* 

i 

00325 

1  L  BF 

1 

00326 

l  i  BF 

20 

EA 

12 

INI  T 

JSR 

JCHD 

REALIZAR  1  NI  CtALlZ  ACION 

00327 

1  1 C2 

4C 

74 

04 

MOGO 

JHP 

TODO  HECHO 

00320 

1  IC5 

V 

00329 

1  1C5 

i 

.00330 

1  1C5 

j  *•* 

ENTRADA  DE  COMANDO  XILL  *** 

00331 

1  IC5 

I 

00332 

1  1 CS 

i 

00333 

1  LC5 

20 

22 

FO 

K  1  LL 

JSR 

RESE  T 

REALIZAR  ARRANQUE 

00334 

1  U-H 

: 

00335 

1  1  C.S 

; 

00336 

1  1C0 

;  *** 

r  QFF  ' 

ENTRADA  GE  COMANDO  QFF  »** 

00337 

L1C8 

I 

00330 

i  ice 

; 

00339 

1  1CB 

A2 

04 

Of  F 

LDK 

■  SYSTM?  SVSTH1  BORRAR  ANAL  ¡¿ADOR  ACTUAL 

00340 

1  LCA 

4C 

02 

10 

JHP 

CROSS 

.COLOCAR  CHRGET  ANTERIOR  EN  SU  SITIO 

0034  1 

1  ICO 

I 

00342 

1  1CD 

t 

00343 

1  ICO 

;  #*# 

ENTRADA  DE  COMANGO  RENAMfc  **• 

00344 

1  1CD 

; 

00345 

1  ICO 

; 

0034* 

1  í  CD 

20 

FO 

12 

Ft£  MAME  JSR 

RDISK 

.preparar  comando 

0034  7 

1  IDO 

20 

79 

OO 

JSR 

CHRGOT 

OBTENER  SIGUIENTE  CARACTER 

00340 

1  103 

FO 

E  7 

B€G 

BADI 

NQ  SE  DA  NINGUN  NOMBRE  MALO 

00349 

1  1  05 

C9 

22 

CnP 

4’  * 

00350 

1107 

DO 

E  3 

BNE 

DADL 

NINGUNA  CITA  DE  COMIENZO  ES  MALO 

00351 

l  109 

A5 

7A 

LOA 

CHRPTR 

.SALVAR  PUNTERO  EN  ANTIGUO  NQMBRt 

00352 

11  DB 

05 

FB 

STA 

ütilpt 

00353 

L  100 

A5 

70 

LOA 

CHRPTR*  L 

00354 

1  LDF 

05 

FC 

STA 

GTILPT4 i 

00355 

1  lEl 

20 

73 

00 

TWIST 

JSR 

CHRGFT 

.PASAR  POR  NUEVO  NOMBRE 

0035* 

1  1 E  4 

FO 

D* 

BED 

BADI 

.MALO  SI  NO  SE  DA  NINGUNO 

00357 

L  IEé 

C9 

22 

CLIP 

4*  “ 

BUSCAR  FINAL  GE  CITA 

00350 

1  LEB 

DO 

F  7 

BNE 

TH1ST 

00359 

1  LEA 

20 

73 

OO 

JSR 

CHRGE T 

A  CONTINUACION  BUSCAR  PALABRA  lü 

003*0 

1  Í£D 

C9 

54 

C«P 

4"  T 

00361 

1  JEF 

DO 

OB 

BNE 

BADI 

00362 

1  1F  1 

20 

73 

00 

JSR 

CHRGE  T 

003*3 

1  1 F  4 

C9 

4F- 

CMP 

4  '  □ 

003*4 

1  1F* 

DO 

C4 

BNfc 

BADI 

00365 

1  1FS 

20 

73 

CiO 

JSR 

CHRGE 1 

.encontrado 

003** 

1  1  F  ti 

20 

BO 

12 

JSR 

STRING 

.COLOCAR  PRIMERO  EL  ULTIMO  NOMBRE 

00  3*  7 

UFE 

A9 

30 

LOA 

#*  » 

INTRODUCIR  SEÑAL  DE  IGUAL  A  {  | 

003*8 

1200 

9D 

3C 

03 

STA 

cnoBtJf  ,  x 

003*9 

L  703 

EB 

INX 

003  70 

1  204 

A5 

FB 

t  DA 

UT  LLPT 

RESTAURAR  CHRPTR  ANTERIOR 

00371 

1706 

85 

7A 

STA 

CHRPTR 

00377 

1200 

A5 

FC 

L  DA 

ÜTILPT  *| 

O0373 

J20A 

tí 

7B 

STA 

LHRPTR* 1 

00  3  74 

120C 

20 

BO 

12 

JSR 

STRING 

COLOCAR  PRIMER  NOMBRE  EL  ULTIMO 

00375 

120F 

A9 

CK» 

LOA 

*400 

.BYTE  DE  CERO  PARA  EL  FINAL 

OO  3  7* 

121  1 

9D 

3C 

03 

STA 

CNDBUf  .  x 

0037  7 

1214 

4C 

32 

12 

JHP 

XHJ  T 

.ENVIAR  EL  COMANDO 

003  70 

L  2 1  7 

i 

00379 

1217 

i 

00390 

121  7 

;  +** 

ENTRADA  DE  COMANDO  SCRATCH 

0030 1 

1217 

0030? 

121  7 

I 

00383 

1217 

20 

OO 

13 

SCRATC  JSR 

SDtSK 

.FIJAR  COMANDO  S 

00304 

1  21 A 

20 

80 

12 

JSR 

STRING 

.añadir  nombre 

00305 

1210 

A9 

OO 

LOA 

«too 

COLOCAR  BYTE  DE  CERO  AL  FINAL 

00306 

I21F 

90 

30 

03 

STA 

CN08UF  ,  X 

00387 

1222 

20 

OF 

13 

JSR 

SLJRE 

ESTAS  SEGURO? 

00380 

1225 

DO 

29 

BNE 

EGRESS 

NO.  SI  NO  ES  CERO 

00309 

1227 

4C 

32 

12 

JMP 

XHI  T 

.REALIZAR  EL  "SCRATCH 

00390 

122A 

j 

00391 

122A 

í 

00392 

122A 

l  *** 

.ENTRADA  DE  COMANDO  SENO  *+* 

00393 

122A 

; 

00394 

122A 

1 

00395 

122A 

20 

AE 

12 

StND 

JSR 

PARAMS 

OBTENER  STRJNtj  DE  COMANDOS 

atacando  una  pequeña  Junción  a  la 
vez. 

Se  presentan  unas  subrutinas  de 
fines  generales  hacia  el  final  de  pro¬ 
grama,  en  la  línea  00452,  Normal- 
mente  son  utilizadas  por  el  resto  del 
programa  para  recoger  los  nombres 
de  ficheros,  obtener  los  parámetros  de 
los  discos,  imprimir  mensajes  en  la 
pantalla,  etc.  En  general,  se  les  han 
asignado  etiquetas  o  nombres  rela¬ 
cionados  a  las  funciones  que  realizan. 

DISK-O-VIC  termina  presentando 
varias  tablas  de  datos  y  direcciones. 
Primero  se  presenta  una  tabla  de 
palabras  clave,  como  hemos  indicado 
antes.  A  continuación  se  presenta  una 
tabla  que  contiene  las  direcciones  de 
las  subrutinas  de  comandos.  Al  final, 
se  crea  un  juego  de  variables  con  la 
finalidad  de  salvar  registros,  etc.  Al 
asignar  variables  a  esta  zona,  se  evita 
el  uso  do  las  importantes  posiciones 
de  página  cero. 

Dado  que  los  detalles  a  veces  con¬ 
tunden  el  asunto,  a  continuación  se 
presenta  un  resumen  de  la  estructura 
general  que  acabamos  de  describir: 

—Proceso  de  i  nidal  i /ación. 

— *La  bifurcación  se  introduce  en  el 
analizador. 

— La  nueva  rutina  de  análisis. 

— Las  subrutinas  do  comandos, 

—Las  subrutinas  de  fines  generales. 

—Los  datos,  direcciones  y  variables. 

Antes  de  dejar  los  aspectos  teóricos 
do  ÜISK-O-VIC,  debemos  mirar  la 
tabla  de  ecuaciones  en  el  listado  do 
ensamblador.  La  tabla  utiliza  alrede¬ 
dor  de  una  docena  de  posiciones  de 
página  cero,  pero  dado  que  se  utilizan 
para  sus  fines  normales,  el  sistema 
operativo  les  hace  poco  caso.  La  ver¬ 
dad  es  que  las  posiciones  $FB  a  $FE 
son  de  página  cero  y  el  VtC-20  no  las 
utiliza  en  absoluto. 

Dado  que  se  trata  de  un  sistema 
operativo  en  disco,  se  supone  que  la 
unidad  de  cassettes  no  se  utiliza.  Esto 
libera  un  gran  bloque  de  espacio, 
empezando  por  $033  C,  que  normal¬ 
mente  se  emplea  como  almacena¬ 
miento  intermedio  de  cassette.  Por  lo 
tanto  este  bloque  se  puede  utilizar 
como  almacenamiento  intermedio  para 
los  comandos  en  disco.  Incluso  si  una 
unidad  de  cassettes  se  une  al  VIC-2D 
j u nt o  c o n  un  disco  fi e x i b  1  e ,  n o  s ti rgi r á 
ningún  conflicto  dado  que  pocas 
veces  se  tendría  acceso  a  las  dos  uni¬ 
dades  a  la  vez. 

Rutinas  ROM 

La  siguiente  en  las  tablas  de  ecua¬ 
ciones  constituye  un  grupo  grande  de 
su bru tinas  incluidas  en  el  conjunto 
ROM  del  sistema  operativo  VlC-20. 
Aunque  vd.  no  tenga  un  uso  inme¬ 
diato  para  d  DISK-O-VIC,  esta  tabla 
le  será  útil.  El  uso  de  una  de  estas 
rutinas  ROM  están  da  rd  en  programas 


32/Commodore  World  Mar/o  J9S4 


Microprocesador:  6502  de  MOS 
TECHNOLOGY  de  S  bits. 

Memoria:  5  Kbytes  de  RAM  ampliahks  a  32  K 
20  Kbyics  de  ROM  amplia  bles  a  28  K 
Pantalla:  23  lincas  de  22  caracteres,  Modulador  para 
conectar  a  un  televisor  normal.  Salida  monitor  video. 
Cobres:  H  para  el  marco.  16  para  el  fonde  de  la  pan 
talla  y  8  para  tos  caracteres  individuales,  video  inverso, 
Gráficos:  Scmri  gráficos  po r  teclado  y  alia  resol uciún 
por  rede  fin  ición  del  generador  de  caracteres  (situán 
dolo  en  RAM).  Definición  de  176  por  184  puntos. 
Teclado:  Tipo  QWERTY  de  62  teclas  más  cuatro  de 
función  definibles  por  el  usuario 
Sonido:  Tres  voces  de  tres  octavas  cada  una  decaladas 
una  octava  entre  si,  resultando  una  extensión  total  de 
cinco  octavas.  Un  generador  de  ruido  aleatorio  afina 
ble  para  efectos  especiales,  un  control  general  de 
volumen. 

Programación:  Lenguaje  BASIC,  intérprete  residente 
en  ROM  de  KK.  Posibilidad  tk  interceptar  las  fundo 
nes  dd  Basic  para  crear  nuevas  instrucciones  "a  medí 
da"  El  Basic  del  Vic  es  uno  de  los  rápidos  actualmcn 

te  en  eJ  mercado, 

Complementos:  Pori  de  usuario  de  8  bits  enirada/sa 
hda  más  dos  señales  de  sincronismo, 

Bus  de  expansión  para  ampliaciones  de  memoria 
y  periféricos 

Pon  de  juegos  con  conexión  para  dos  potenciómetros 
Ipaddbü.  y  una  palanca  de  juegos  (Joystíck). 

Alma  cena  miento  de  masa:  Unidad  de  cassette  C2N 
de  diseño  especia!  para  registrar  programas  y  datos. 
Ampliación  de  mi-muría:  En  caso  de  ser  necesario 
conectar  más  de  un  cartucho  al  mismo  tiempo,  está 
disponible  un  módulo  fVlC  JÜ201  que  permite  la 
conexión  simultánea  de  hasta  seis  cariuchos. 


VIC*  1541  UNIDAD  DE  DISCO 


(  apacidud  total:  174848  bytes  por  disco. 

Secuencia I:  168656  hytes  por  disco 
Entradas  de  directorio:  !  44  por  disco. 

Sectores  por  pista:  De  1 7  a  21 
Bytes  pnr  sector:  256, 

Pistas:  35. 

Bloques:  683  (644  bloques  libres!. 

Soportes  de  información:  Discos  standar  de  5  1/4 
pulgadas,  de  una  sola  cara  v  densidad  simple. 
SLstema  operativo:  DOS  de  COMMODÜRE  intcli 
gente  (tiene  procesador  propio  y  no  ncupa  memoria 
del  ordenador  central!. 


VIC  1625  IMPRESORA 


Método  de  impresión:  Matriz  de  5  X  7  ptíntos,  impac 
to  por  un  solo  martillo. 

Modo  caracteres:  Mayúsculas  y  minúsculas,  símbolos, 
números  y  caracteres  gráficos  del  VIC  20. 

Modo  gráfico:  Puntos  direccionahles  [bil  imagel.  Siete 
puntos  verticales  por  columna,  480  columna  máximo, 
Velocidad:  30  caracteres/segundo,  de  izquierda  a  dere 
cha.  unidireccional. 

Caracteres/ Linea:  Máximo  80  (Posibilidad  de  impre 
sión  en  doble  ancho!. 

Espaciado  entre  lineas:  6  lineas/pulgada  modo  earac 
teres,  9  lincas/ pulgadas  —  modo  gráfico. 

Aumentación  de  papel:  Arrastre  por  tractor. 

Ancho  de  papel:  En(re  4,5  y  KJ  pulgadas. 

Copias:  Original  más  dos  copias. 


CARTUCHOS 


Avuda  programad nn  Facilita  la  edición  y  depuración 
de  programas  en  Basic,  Instrucciones  y  comandos: 
RENUMBER,  MERGE.  FIN  IX  CHANCE.  DEL  EJE. 
AUTO.  TRACE,  STEP.  OFF.  KEY,  EDIT.  PROGt 
DUMP.  HELP  y  KILL. 

Super  expanden  Intercepta  el  Basic  del  VIC  permi 
riendo  incrementar  sus  instrucciones  y  comandos  en 
aplicaciones  gráficas  de  sonido  y  juegos.  Instruccio 
nes  v  comandos:  KEY.  GRAPHTC,  COLOR.  POINT. 
REGION.  DRAW,  CIRCLE.  PAINT,  CHAR. 
SCNCLR.  SOL  ND,  RGE.  RCOl.R,  RDOT,  RPOT. 
RPEN.  RJOY  y  RSND, 


Monitor  de  lenguaje  máquina:  Facilita  enormemente 
la  depuración  de  programas  en  lenguaje  máquina,  es 
ideal  como  complemento  dd  Basic  para  redactar  y 
poner  en  marcha  rutinas  de  alta  velocidad  y  manejo 
de  datos  en  tiempo  real.  Instrucciones  y  comandos: 
ASSEMBLE.  BREAKPOINT,  DTSASSEMBl  E. 
ENABLE  VIRTUAL  /ERO  PACE.  FILL  MEMORY. 
CiO.  HL  NT,  INTER  PRET*  JUMP  TO  SUBROLTT1NÉ. 
LOAD,  MEMORY,  NUMBER.  QUlCK  TRACE* 
REG1STERS.  REMOVE  BREAt’POINTS,  SAVE. 
TRANSFRR,  WALK  y  EXIT  TO  BASIC 
Además  existen  cartuchos  de  ampliación  de  memoria 
tk  3.8  y  16  Kbytes. 


CURSO  DE  INTRODUCCION 
AL  BASIC  PARTE  I  y  II. 


En  forma  de  libro  se,  ha  editado  la  primera  y  segunda 
parle  de  un  curso  de  Basic  que  parte  *Yte  cero**  y 
está  basado  en  el  VIC  20,  Van  acompañados  de  dos 
cassettes  con  programas  y  ejercicios  pora  autocontrol 


PLOTTER  VIC  1520 


Método  de  impresión:  Dibujo  mediante  bolígrafos  de 
diseño  especial. 

(  olor  4  adores;  negro,  azul,  verde  y  rojo  con  cambio 
desde  programa. 

Cabezal:  Pkner  X  Y  tipo  tambor 

Velocidad  de  impresión:  Media  de  14  car./seg, 

Caracteres  pnr  línea:  Máximo  80  carac..  formatos  de 

80,  40.  20  y  10  ea rae /linca 

Juego  de  caracteres:  96. 

Velocidad  de  dibujo: 2 64  pasos/scg 
Longitud  del  paso:  0*2  mm.  en  dirección  X  c  Y 
Velocidad  de  dibujo  de  linea:  52.8  mm./seg  en  direc 
ción  X  e  Y  73  mm./seg.  en  una  línea  a  45  grados. 
Area  de  dibujo:  480  pasos  (96  mm.l  en  dirección  X. 
Programaba  en  dirección  Y  (Máx  +  —  999  de  una 
sola  vez!. 

Papel:  Rollo  de  4*5  pulgadas  (114  mm.l, 


MONITOR  EN  COLOR  C-1701 


Pantalla:  13  pulgadas  (330  mm.l 
C  apacidad  de  representación:  25  lineas  de  40  caracteres. 
Resolución:  320  lincas  horizontales 
Compatibilidad:  VIC  2ü  y  CGMMODORE  64 
Conecta  ble  a  un  registrador  de  video. 

Amplificador  >  altavoz:  Incorporados 


commodore 

COMPUTER 


microelectrónica 
y  control,  s.  a. 

Taquígrafo  Serra.  7  5.°  Telf.  250  51  03,  BARCELQNA-29 
Princesa,  47  3.»  G.  Tel!.  248  95  70.  MADRID-8 


fabricados  por  uno  mismo,  permitirá 
el  ahorro  de  centenares,  hasta  miles, 
de  bytes.  Vamos  a  examinar  unas 
cuantas  rutinas  con  más  detalles. 

Las  rutinas  ROM  del  VIC-20  pue¬ 
den  clasificarse  en  dos  categorías 
generales.  La  primera,  llamada  Ker- 
naL  incluye  las  rutinas  principales 
para  operaciones  de  entrada  y  salida, 
(Aunque  no  se  sepa  por  qué,  la  forma 
de  escribir  “Kernal"  es  la  que  se 
acepta  oficialmente  en  Commodore). 
listas  rutinas  Kernal  se  consideran 
especiales  porque  varios  modelos  de 
ordenadores  Commodore  incluyen  las 
mismas  rutinas  que  se  encuentran  en 
las  mismas  direcciones. 

Por  ejemplo,  la  rutina  de  “salida  de 
byte"  tiene  lugar  en  $FFD2  en  todos 
los  modelos  de  ordenadores  Commo¬ 
dore,  Sin  embargo,  en  general  las 
rutinas  Kernal  son  idénticas  sola¬ 
mente  en  el  VIC-20  y  el  Commodore 
64.  Lsto  significa  que  el  software  que 
emplea  mucho  las  rutinas  Kernal  debe 
ser  de  Fácil  transferencia  del  VIC-20  al 
Commodore  64,  y  al  revés. 

Los  comandos  Basic  forman  otra 
categoría  de  rutinas.  Las  posiciones 
de  éstos  serán  diferentes  en  cada 
máquina,  pero  parecidos  para  los 
ordenadores  Commodore,  Un  ejem¬ 
plo  de  estas  rutinas  es  la  que  se 
encuentra  en  SCB1E,  etiquetada 
PSTRNG  en  el  listado  1.  Cuando  se 
solicita,  se  imprime  un  “strmg"  en 
pantalla  señalado  por  el  acumulador 
y  el  registro  “y".  Sigue  imprimiendo 
la  serie  de  caracteres  hasta  que  se 
detecta  un  cero  final. 

La  tabla  de  ecuaciones  del  listado  l 
proporciona  información  adicional 
sobre  el  funcionamiento  del  VIC-20, 
En  la  mayoría  de  los  casos,  las  posi¬ 
ciones  y  las  rutinas  llevan  etiquetas 
para  facilitar  la  interpretación,  y  los 
comentarios  proporcionan  más  deta- 
lies.  Si  desea  saber  más  sobre  las  ruti¬ 
nas  Kernal,  vea  “La  Guía  de  Referen¬ 
cia  para  el  Programador  del  VIC-20 
(Howard  W.  Sams  and  Co.,  PO  Box 
7092,  Indianapolis,  IN  46206).  Para 
poder  comprender  las  rutinas  no  Ker- 
naL  hace  falta  un  mapa  de  memoria 
más  extensa. 

Introducir  el  Programa 

Ya  que  hemos  hablado  de  la  teoría 
y  la  operación  del  DISK-O-VIC, 
tenemos  que  considerar  el  lado  prác¬ 
tico  de  las  cosas.  El  usuario  debe  de 
crear  una  copia  en  disco  del  código 
objeto  para  que  tenga  el  programa 
utilidad  siempre  a  mano.  Con  esta 
finalidad,  el  volcado  hexadecimal  deí 
Listado  2  corresponde  al  código 
fuente  del  Listado  L  Para  usarlo,  se 
introducen  los  números  hexadeci ma¬ 
les  en  el  VIC-20  y  se  salva  en  disco. 
Por  lo  tanto,  para  llamar  DISK-O 
VIC,  se  carga  y  se  inicial  iza  el  código. 
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Listado  i  continuación 


0G396  1 22D  A9  00 

00397  122F  ?D  5C  03 

00396  1232  20  EA  12 

0039?  1235  20  08  12 

00400  1238  AO  OO 

00401  123A  B9  3C  03 

00402  123D  FO  06 

00403  123F  20  AS  FF 

00404  1242  CB 

00405  1243  90  F5 

00406  1245  20  A£  FF 

00407  1246  20  53  12 

00408  124B  FO  03 

00409  1 240 

00410  1240 

00411  1 24 D 

00412  1240 

00413  1 24 D 

00414  124D  20  53  12 

00415  1 250  4C  74  C* 

00416  1253  A9  OS 

00417  1255  85  BA 

00418  1257  20  B4  FF 

00419  125A  A9  6F 

00420  125C  20  96  FF 

00421  S25F  AO  DO 

00422  1261  20  A5  FF 

00423  1264  99  3C  03 

00424  1267  CB 

00425  126S  C9  OD 

00426  126A  OO  F5 

00427  126C  A9  OO 

00420  126E  99  3C  03 

00429  1271  20  AB  FF 

00430  1274  AO  OO 

00431  1276  A9  30 

00432  127S  09  3C  03 

00433  127B  DO  06 

00434  1270  CB 

00435  I27E  D?  3C  03 

00436  1281  FO  15 

OO 437  1283  20  £5  12 

00438  1206  20  CC  FF 

00439  1289  20  36  13 

00440  128C  A9  3C 

00441  12B£  AO  03 

00442  1290  20  1E  CB 

00443  1293  6B 

00444  1294  68 

00445  1295  40  74  C4 

00446  1298  60 

00447  1299 

00440  1299 

0044?  1299 

00450  1 299 

00451  1299 

00452  1299  20  E A  12 

00453  1 29C  BA 

00454  1 29D  A2  3C 

00455  129F  AO  03 

00456  12A1  20  00  FF 

00457  12A4  A?  08 

00450  12A6  AA 

0045?  12A7  AO  00 

00460  I2A9  04  90 

00461  J2AB  4C  BA  FF 

00462  1 2AE 

00463  12AE 

00464  12AE  A2  00 

00465  12BO  86  B 7 

00466  1202  20  79  00 

00467  12B5  FO  1F 

00466  12B7  09  22 

0046?  1209  DO  IB 

00470  12BB  E6  7A 

00471  120D  OO  02 

00472  1 20F  £6  70 

00473  l 2C 1  AO  OO 

00474  1 2C  3  01  7A 

00475  1 2C5  FO  OA 

00476  12C7  C9  22 

00477  12C9  FO  06 

00470  12CB  9D  3 C  03 

00479  12CE  E8 

00400  12CF  DO  EA 

00401  1201  E4  B7 

00402  12D3  FO  OI 

00483  1 2D5  60 

00484  1206  68 

00405  12D7  68 

00486  12D0  4C  08  CF 

00497  12DB 

00408  12DB 

00489  12D0  A9  08 

00490  12DD  20  01  FF 

00491  12E0  A9  6F 

00492  12É2  4C  93  FF 

00493  12E5 


evie  DE  CERO  SIGNIFICA 
.FIN  DE  STRING 
INICJALIZAR  disco 
FIJAR  CANAL  DE  COMANDOS 


LDA  4400 
STA  CMOBUF , X 
JSR  1 CMD 
JSR  RESPON 
LDV  4400 
LDA  CMDBUF , V 
BEO  5WEEP 
JSR  CIOUT 
1NY 

BCC  5HOOT 
JSR  UNLIST 
JSR  DERROR 
BEO  EGRES5 


Q0IENEH  STRING  Df  COMANDOS 
.CERO  SIGNIFICA  FINAL 
SI  NO  ENVIAR  CARACTER 


.BIFURCAN  SI  NO  EXISTE  ERROR 
DESCONECTAR  EL  DISCO 
COMPROBAR  ESTADO  DE  DISCO 
BIFURCAR  SIEMPRE 


ENTRADA  DE  COMANDO  STATUS 


COMPROBAR  ESTADO  DISCO 


STATUS  JSR  DERRDR 
EGRE5S  JHP  WARHST 
DERROR  LOA  4406 

STA  device 

JSR  T  AL.  K 
LDA  446F 
JSR  TK5A 
LDV  4400 
XFER  JSR  AC;PTFt 

STA  CMDBUF  ,  Y 
INV 

CMP  4400 
BNE  XFER 
LDA  4400 
STA  CMDBUF  „  V 
JSR  UNTALfe 
LDV  4400 
LDA  4'0 
D“l P  CMDBUF  ,  ¥ 
0NE  DEFER 
1NY 

CMP  CMDBUF ,  V 

ero  noerr 

DEFER  JSR  3HUT 

JSR  CLRCHN 
JSR  CARRTT 
LDA  •< CMDBUF 
LDV  4  ? CMDBUF 
JSR  PSTRNG 
PIA 
PLA 

JMP  WARMST 
NÜERFf  RTS 


PREPARADO  RARA  LEER 
EL  CANAL  DE  ERRORES 
OBLIGAR  EL  BUS  QUE  HABLE 
ESTO  ES  CANAL  DE  ERRORES 
DIRECCION  SECUNDARIA  DESPUES  DE  HABLAN 


OBTENER  BYTE  DE  BUS 
SALVARLO  AQUI 


BUSCAR  RETORNO  DEL  CARRO 
.SI  NO.  OBTENER  SIGUIENTE  CARRO 
COLOCAR  BYTE  DE  CERO  PARA  EL  FINAL 


DESCONECTAR  CANAL 
BUSCAR  00  DE  ASCII 


SIN  DUDA  ES  UN  ERROR 


NO  SE  ENCUENTRA  NINGUN  ERROR 
CERRAR  EL  FICHERO 
RESTAURAR  DISPOSITIVOS  DE  FALLOS 
.IMPRIMIR  RETORNO  DEL  CARRO 


IMPRIMIR  EL  MENSAJE  DE  ERROR 
NO  RETORNAR  Si  ES  MALO 


IR  A  BASIC 

RETORNAR  A  RUTINA  DE  LLAMADA 


?  SUBHUTINAS  DE  FINES  GENERALES 


, I NI Cl ALIZAR  DISCO 
ESTO  ES  LA  LONGITUD  DÉ  NOMBRE 
X  E  Y  CONTIENEN 
LA  DIRECCION  DEL  NOMBRE 
FIJAR  nombre  DE  programa 
NUMERO  DE  FICHERO  LOGICO 
NUMERO  DE  DISPOSITIVO  DE  DISCO 
.SECUNDARIO  PARA  VOLVERA  UBICAR 
SACAR  EN  CERO  SI 
FIJAR  PARAMETROS  DE  FICHERO 


5ETU15  JSR  1 CMD 
TXA 

LDX  4 < CMDBUF 
LDY  4  > CMDBUF 
JSR  SET MAM 
LDA  «400 
TAX 

LDY  4400 
STY  ST 
JMP  SETLFS 


SALVAR  LONGITUD  ORIGINAL 
OBTENER  NOMBRE  DE  FICHERO 
NO  SE  DA  NINGUN  NOMBRE 
SE  NECESITA  UNA  CITA 


ACTUALIZAR  PUNTERO  CHRGET 


v  Y  .OBTENER  SIGUIENTE  CARACTER 
CERO  SIGNIFICA  EL  FINAL  DEL  ALMAC  INTERM 
CITA  FINAL  AHORA5 
51.  STRING  OBTENIDO 
l  ALMACENAR  AQUI  PROVISIONALMENTE 


BIFURCAR  SIEMPRE 
NO  PERMITIR  NOMBRES  DE 
LONGITUD  CERO 


QUITAR  ANTIGUA  DIRECCION  DE  RETORNO 


.IR  A  RUTINA  DE  ERRORES 


OBTENER  NUMERO  DE  DISCO 
HACER  QUE  EL  DISCO  ESCUCHE 


SECUNDARIO  DESPUES  DE  ESCUCHAR 


Lutado  1  continuación 

00474 

12C5 

1 

00473 

1  2E5 

A9 

O0 

SHUT 

LDA  4400 

NUMERO  DEL  FICHERO  LOGICO 

00476 

12E7 

4C 

C3 

FT 

JNP  CL  OSE 

CERRAR  EL  FICHERO 

00497 

12EA 

1 

00490 

12EA 

1 

004 TV 

I2£A 

A9 

49 

ICMD 

LDA  1 

.COMANDO  DE  INICtAUZAClON 

00500 

12EC 

2C 

-BYTE  42C 

00301 

12EW 

A9 

5b 

ceno 

IDA  *'V 

COMANDO  DE  VAUDEZ 

00302 

I2£F 

40 

PHA 

SALVAR  EL  COMANDO 

0030  3 

12F0 

20 

DB 

12 

JSR  RESPON 

FIJAR  CANAL  DE  COMANDOS 

003*,' 

12F3 

60 

PLA 

OBTENER  COMANDO  Y 

00303 

1  2F4 

20 

A0 

FF 

JSR  CIOUT 

enviarlo 

0030* 

12F7 

4C 

AE 

FF 

JMP  UNLIST 

PROVOCAR  UN  UN- LISTEN 

00307 

1  2F  A 

i 

oosoe 

12F0 

i 

00307 

12F6 

A9 

4E 

HDISF 

LOA  #'« 

.PREPARAR  COMANDO  '  HEADER 

003 1 0 

12FC 

2C 

.BYTE  *2C 

0031  i 

12FD 

A9 

52 

RD1SK 

LDA  »'R 

PREPARAR  COMANDO  RENAME 

00312 

12FF 

2C 

.BYTE  42C 

00313 

1  300 

A9 

53 

SD1SK 

LDA  *'5 

PREPARAR  COMANDO  SCftATCH 

00314 

1302 

A2 

OO 

LDX  4*00 

00313 

1304 

9D 

3C 

03 

STA  CMDBUF , X 

ALMACENAR  COMANDO  fOUI 

00316 

1307 

bU 

INX 

00317 

1300 

A9 

3A 

LDA  l* : 

□OS  PUNTOS  COMUNES  PARA  TODOS 

00310 

130A 

9D 

3 C 

03 

5TÑ  CMDBUF , X 

ALMACENARLOS  aquí 

003 1 V 

1300 

EB 

1NX 

PREPARAR  PARA  SIGUIENTE  BYTE 

00320 

Í3QE 

60 

RT5 

00321 

130F 

00522 

130F 

; 

00523 

1  30F 

A2 

00 

SURE 

LDX  *600 

00524 

131  i 

ÜD 

3E 

13 

Sf^EAK 

LDA  MESSAG,* 

.ENVIAR  MENSAJE 

00525 

1314 

FO 

06 

BEÚ  SILENT 

estas  seguro? 

00526 

1316 

20 

42 

E? 

JSR  CHROUT 

00527 

1319 

E0 

1NX 

00528 

131A 

DO 

F5 

BNE  SPCAK 

bifurcas  siempre 

00329 

1  3 1 C 

20 

CF 

FF 

SI LE NT 

JSR  INPUT 

.BUSCAR  S^Sl 

00330 

131F 

C9 

53 

CMP  #' s 

00331 

1321 

Otí 

PMP 

00332 

1322 

20 

36 

13 

JSR  CARRET 

IMPRIMIR  RETORNO  DE  CARRO 

00533 

1325 

28 

PLP 

00534 

1326 

60 

RTS 

00535 

1327 

1 

00336 

1327 

t  9 

00337 

1327 

20 

E4 

FF 

PAUSE 

JSR  GET1N 

OBTENER  UN  BYTE 

OO530 

132A 

FO 

09 

BE 0  NOWAI T 

NO  HAY  SIGUE 

00539 

132C 

C9 

20 

CHP  *620 

00540 

132E 

DO 

05 

BNE  N0WA1T 

.NINGUN  ESPACIO  DISPONIBLE 

00341 

1330 

20 

E4 

FF 

KEVUP 

JSR  GETIN 

ahora  esperar 

O0342 

1333 

FO 

FB 

SfcQ  KEYUP 

.OTRA  PULSACION 

00343 

1335 

60 

NOWAI T 

RTS 

00344 

1336 

I 

00545 

1336 

¡ 

00346 

1336 

A9 

OD 

CARRtT 

LOA  *»0D 

IMPHIMIR  RETORNO  DE  CARRO 

00347 

1330 

2C 

*  BYTE  *2C 

00540 

1337 

A9 

20 

SPACE 

LDA  *620 

.IMPRIMIR  UN  ESPACIO 

0054 V 

133Q 

4C 

□2 

FF 

JMP  OUTPUT 

00330 

133E 

I 

00551 

133E 

I 

00532 

133E 

í  TABLA  DE  DATOS  Y  DIRECCIONES  PARA  DlSK  0  VIC 

00553 

1  33E 

i 

O0554 

133E 

* 

O0555 

l  33E 

ÓD 

HE55AG 

» BYTE  60D 

00556 

133F 

45  ,53 

.  BYTE  ESTAS  SEGURO?  jS  N) 

O0557 

1333 

00 

.BYTE  6O0 

00538 

1354 

4C 

SYSTH1 

,  BYTE  *4C 

\ NEW  CMRGCI. 

00537 

1355 

13 

io 

.WORD  INSERÍ 

00560 

1357 

OO 

* BYTE  600 

00561 

1350 

BO 

SYSTH2 

. BYTE  600,  6ÜA 

1 OLD  CHRGE 1 , 

00361 

1359 

OA 

00362 

1  33A 

C7 

, BYTE  6C7,  600 

00362 

135B 

00 

00363 

133C 

1 

00564 

135C 

1 

00563 

135C 

*  TABLA 

DE  PALABRAS  CLAVE  DÉ  DlSN  O-VtC 

00566 

135C 

I 

00567 

133C 

; 

00368 

133C 

INOIA  El  BYTE  ADICIONAL  DÉ  CADA  LINEA 

00569 

1  35C 

ÍES  LA  ULTIMA  LETRA  EN  POSICION  DE  SH1FT 

00570 

133C 

te  ASCII 

£BDl  PARA  EL  ANALIZADOR 

00371 

135C 

*  1 

00572 

135C 

1 

00573 

135C 

41 

SO 

kEYWRD 

, BYTE  * APPEN1 , 

6C4 

00573 

1361 

C4 

00574 

1362 

43 

41 

^  BYTE  *  CATALO" 

,  6C7 

00574 

1360 

C7 

00573 

1369 

43 

4F 

*  0Y  TE  ’  CEM-LEC r 

*  404 

00575 

136F 

04 

00576 

1370 

44 

4C 

^  BYTE  '  DLOA'  , 

4C4 

00376 

1374 

C4 

0057  7 

1375 

44 

53 

.BYTE  ' DSAV" , 

4C5 

005  77 

1379 

C5 

00570 

137A 

48 

43 

. BYTE  'HE ADE - , 

4D2 

00570 

137F 

D2 

00377 

1300 

49 

4E 

49 

,  BYTE  '  INF,  6D4 

00577 

1303 

04 

00380 

1  384 

40 

49 

4C 

.  BYTE  f»UL*  ,  6CC 

00580 

1  307 

CC 

00301 

1308 

4F 

4b 

-BYTE  1 OF 1 ,  *C* 

00301 

1  3BA 

C6 

00502 

1  300 

52 

45 

.BYTE  RENAH-, 

6C5 

Dado  que  el  programa  está  escrito 
en  lenguaje  máquina,  hace  falta  un 
monitor  de  lenguaje  máquina  para 
introducirlo.  El  V1C-20  no  dispone  de 
un  monitor  residente,  pero  se  ven  cada 
vez  más  monitores  de  acoplamiento. 
Dos  buenas  opciones  son  el  VICmon 
o  el  Tinymon. 

El  VICmon,  fabricado  por  Com- 
modore,  es  el  monitor  de  lenguaje 
máquina  oficial  para  el  VIO 20  y 
ofrece  muchos  comandos.  Se  hace  en 
forma  de  cartucho  (cartridge)  (ROM) 
y  se  encaja  fácilmente  en  la  puesta 
para  ampliación.  Por  otro  lado,  el 
Tinymon,  es  un  monitor  de  cinta  o 
cargado  en  disco.  La  ventaja  del 
Tinymon  es  que  puede  ser  tecleado 
pur  el  usuario  y  así  se  ahorra  bastante 
dinero.  No  soporta  tantos  comandos 
como  el  VICmon  pero  eso  no  importa 
para  el  propósito  que  tenemos  aquí. 
Sólo  nos  interesan  los  comandos  de  S 
(salvar)  y  de  M  (volcado  de  memoria). 
Por  lo  tanto,  cualquier  monitor  sirve 
nuestros  propósitos. 

Para  hacer  una  copia  de  DISk-O 
VI C  para  el  ordenador  se  siguen  las 
instrucciones  que  se  presentan  a  con¬ 
tinuación: 

— Des  co  nec  t  a  r  c  ua  Iq  u  ie  r  acop  I  a  m  i  e  n  - 
to  adicional  a  la  memoria.  DISK-O- 
VIC  tiene  que  introducirse  en  una 
máquina  “stock”, 

—Cargar  un  monitor  de  lenguaje 
máquina.  Sirve  igual  un  monitor 
basado  en  cinta/ disco  o  de  “cartridge”, 
—Se  introduce  el  código  objeto 
mediante  perforación  utilizando  como 
guía  el  Lisiado  2.  Se  inicia  la  intro¬ 
ducción  en  la  posición  $1000  y  se  con¬ 
tinúa  hacia  arriba, 

— Una  vez  introducido  el  código,  se 
modifican  las  siguientes  posiciones. 
Introducir  el  byte  de  datos  $2E  en  las 
posiciones  $2D,  $2F  y  $31.  Se  intro¬ 
duce  el  byte  de  datos  $15  en  las  posi¬ 
ciones  $2E,  $30  y  $32,  Todas  estas 
posiciones  son  de  página  cero, 

—El  monitor  sale  en  Basic  usando 
el  comando  X, 

— Se  salva  el  programa  utilizando 
el  comando  normal  de  “SAVE”  del 
VIC- 20.  El  programa  puede  salvarse 
tanto  en  cinta  como  en  disco. 

— Si  así  se  desea,  cualquier  acopla¬ 
miento  adicional  de  memoria  puede 
volver  a  conectarse. 

Así  se  dispone  de  una  versión  com¬ 
pleta  de  DISK-O- VIC  lista  para 
usarse.  El  código  que  se  acaba  de 
introducir  \  salvares  muy  especial.  Se 
puede  cargar  y  ejecutar  como  cual¬ 
quier  otro  programa  de  Basic,  Cuando 
se  ejecuta  el  programa,  un  cargador 
especial  automáticamente  vuelve  a 
ubicar  el  DIS-O-VIC  al  principio  de 
la  memoria,  sea  cual  sea  la  localiza¬ 
ción,  Además,  el  cargador  compensa 
de  forma  instantánea  cualquier  me¬ 
moria  adicional  que  se  encuentre 
conectada  al  VIC- 20, 
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00562 

1  390 

CS 

00563 

1  39  J 

53 

43 

,0¥TE 

' 5CB6TC* 

.  »C8 

0056  3 

1  397 

CS 

00564 

1  390 

53 

45  4E 

*0¥TE 

' SER  H  ,  4C4 

00564 

í  396 

C4 

00565 

139C 

53 

54 

.  BYTE 

*  ST6Ty ' , 

♦D3 

00565 

1  3AL 

□  3 

00566 

13A2 

OO 

.  BYTE 

600 

FIN  DE  MARCADOR  DE  PALABRAS  CLAVE 

00507 

1363 

; 

00566 

i  3A3 

t 

00589 

L3A3 

}►»*  DIRECCIONES  DE  ACCIONES  DE  RUTINA  *** 

00590 

13A3 

I 

00591 

13A3 

j 

00592 

1  363 

90 

10 

6CT  i  UN 

.WORD 

6PPEND  ] 

00593 

J  365 

00 

lO 

.WORD 

CAI  -1 

00594 

1367 

20 

1  1 

.  WORD 

COELEC- l 

00595 

1369 

33 

1  I 

.WORD 

DL  060  1 

00596 

l  366 

61 

1  1 

.  WORD 

DS6V/E  -  1 

00597 

136D 

81 

1  l 

.WORD 

HCADER  l 

00590 

I3AF 

H* 

1  1 

thord 

INIT^I 

00599 

L3BJ 

C4 

1  1 

.  WORD 

KILL- 1 

00600 

1363 

C7 

1  1 

.  WORD 

Of  F  -  l 

00601 

1  305 

CC 

1  1 

*  WORD 

PENAME  1 

00602 

1367 

16 

12 

.  WORD 

SCR0  r  c - 1 

00603 

1  309 

29 

12 

.  WORD 

SEND-1 

00604 

L  3BB 

4C 

12 

.WORD 

STATUS- 1 

00605 

130D 

| 

00606 

1  30  P 

1 

00607 

130D 

1  VARIABLES  DÉ  DlSK  0  V1C 

00606 

L36D 

I 

00609 

1  3BD 

í 

006 1 0 

1  3BD 

OO 

S0AVE 

*  BY  TE 

♦OO 

SALVAR  REGISTRO  DE  ESTADO 

0061 1 

1  30E 

OO 

0S0VE 

.BYTE 

♦OO 

SALVAR  ACUMULADOR 

006 12 

13BF 

00 

Í56VE 

*  BYTE 

♦OO 

SALVAR  REGISTRO  X 

00613 

L3C0 

OO 

YSAVE 

.  BYTE 

♦oo 

salvar  registro  Y 

00614 

1  3C 1 

.  END 

La  tarea  de  teclear  este  programa 
puede  resultar  fa  herí  osa,  por  lo  cual 
es  aconsejable  que  se  realice  entre 


varios  usuarios.  Ls  una  ventaja  que 
aunque  el  programa  se  ha  escrito  en 
lenguaje  máquina,  éste  se  parece  a 


Basic  para  el  VIC-20.  Esto  significa 
que  es  bastante  fácil  realizar  copias  de 
reserva.  Se  hace  cargando  el  DISK-O- 
VÍC  (sin  ejecutarlo)  y  se  salvan  más 
copias  utilizando  el  comando  normal 
de  Save. 

Conclusión 

El  valor  práctico  de  LHSK-G-VIC 
es  evidente,  pero  el  programa  también 
debe  servir  como  ejemplo  de  la  forma 
en  que  un  sistema  operativo  en  disco 
completo  puede  ser  ímplementado  en 
el  V 10-20,  El  ordenador  evidente¬ 
mente  contiene  muchas  rutinas  im¬ 
portantes  en  ROM  y  le  incumbe  a 
cada  usuario  aprender  todo  lo  que 
puede  sobre  ellas.  El  programa  tam¬ 
bién  demuestra  que  la  unidad  de  disco 
1541  constituye  una  unidad  enorme¬ 
mente  flexible. 

La  programa  con  del  VlC-20  y  la 
1541  en  lenguaje  máquina  para  que 
realicen  comandos  nuevos  y  más 
complicados  no  resulta  tan  difícil 
como  parece  ai  principio.  La  clave, 
por  supuesto,  es  dividir  el  problema 
en  una  serie  de  subrutinas  más  peque¬ 
ñas,  aprovechando  al  máximo  las 
numerosas  rutinas  ROM  disponibles. 
Fue  este  el  procedimiento  utilizado  en 
DISK-O-VIC, 


Listado  2.  El  volcado  hexadeámal  del  programa  de  utilidad  DIS-O-VIC. 

Nota:  Se  precisa  un  monitor  de  lenguaje  de  máquina  para  ejecutar  este  listado , 


PC 

JRO  SR  AC  XR  YR  SP 

1  160 

36 

62 

OO 

OO 

86 

OB 

A4 

76 

1 2DB 

03 

E0 

20 

73 

00 

00 

DO 

OB 

1450 

2C 

69 

52 

2C 

69 

53 

62 

00 

B7BO 

E455  34  33  30  36  F0 

1160 

89 

OO 

00 

02 

38 

FD 

9B 

FF 

1  2EO 

9D 

3C 

03 

20 

4E 

FF 

OO 

DO 

1450 

OO 

9D 

3C 

03 

ES 

09 

36 

9D 

1  170 

OO 

FO 

13 

C9 

80 

FO 

13 

E6 

17E0 

09 

4C 

71 

FE 

OO 

4C 

08 

CF 

1460 

3C 

03 

E8 

60 

62 

00 

00 

RE) 

lOGO 

00 

1C 

10 

OI 

OO 

99 

22 

93 

1  1  78 

08 

E8 

BD 

96 

FF 

OO 

10 

F6 

12FO 

20 

29 

FF 

OO 

4C 

74 

C4 

20 

1468 

7D 

FF 

OO 

FO 

06 

20 

42 

£7 

looe 

1  1 

L  1 

12 

22 

63 

36 

29 

22 

1  180 

BD 

90 

FF 

OO 

DO 

E4 

FO 

C6 

I2FQ 

22 

FD 

A2 

04 

4C 

41 

FC 

OO 

1470 

EB 

DO 

F3 

20 

CF 

FF 

C9 

53 

101O 

44 

49 

53 

40 

2D 

4F 

2D 

56 

1  188 

ES 

C8 

DO 

EO 

84 

76 

65 

OB 

1300 

20 

3C 

FF 

OO 

20 

79 

oo 

OO 

1478 

oe 

20 

75 

FF 

OO 

28 

60 

20 

1019 

49 

43 

22 

OO 

36 

10 

02 

OO 

!  190 

OA 

6A 

BD 

E3 

FF 

OO 

48 

BD 

1308 

FO 

E7 

C9 

22 

DO 

E3 

65 

76 

1400 

E4 

FF 

FO 

09 

C9 

20 

DO 

05 

1020 

99 

22 

1  1 

20 

44 

49 

53 

40 

1  198 

E2 

FF 

OO 

48 

20 

7B 

FC 

OO 

1310 

85 

FB 

AS 

70 

85 

FC 

20 

73 

1408 

20 

E4 

FF 

FO 

FB 

60 

69 

OD 

1  026 

20 

43 

4F 

4  D 

4D 

41 

4E 

44 

1  160 

4C 

73 

OO 

OO 

68 

68 

20 

7B 

1  3IB 

OO 

OO 

FO 

Dó 

C9 

22 

DO 

F7 

1490 

2C 

69 

20 

4C 

02 

FF 

OD 

45 

1030 

20 

50 

41 

43 

4B 

41 

47 

45 

1  168 

FC 

00 

20 

6B 

C9 

4C 

9F 

C4 

1320 

20 

73 

OO 

OO 

C9 

54 

DO 

CB 

1498 

53 

54 

41 

53 

20 

53 

45 

47 

1038 

22 

OO 

53 

10 

03 

OO 

99 

63 

1  1  BO 

60 

02 

65 

2D 

DO 

02 

Có 

2E 

1328 

20 

73 

00 

OO 

C9 

4F 

DO 

C4 

14A0 

55 

52 

4F 

3F 

20 

28 

53 

2F 

1  040 

34 

79 

22 

46 

4F 

52 

20 

54 

1  188 

C6 

2D 

88 

DO 

F5 

65 

2D 

85 

1330 

20 

73 

OO 

oo 

20 

EF 

FE 

OO 

1460 

4£ 

29 

20 

OO 

OO 

*C 

52 

FC 

1040 

48 

45 

20 

56 

49 

43 

2D 

32 

1  ICO 

FB 

65 

2£ 

85 

FC 

4Í 

70 

FD 

1338 

69 

3D 

9D 

3C 

03 

E8 

65 

FB 

1 4  BU 

OO 

OO 

OO 

BO 

OA 

C9 

OO 

OO 

i  050 

30 

22 

OO 

62 

10 

04 

00 

99 

1  tes 

OO 

20 

29 

FF 

OO 

69 

24 

SD 

1340 

05 

76 

65 

FC 

85 

7B 

20 

EF 

1  4B8 

41 

50 

50 

45 

4E 

C4 

43 

41 

L  059 

A3 

31 

30 

29 

72 

i  i 

42 

59 

1  IDO 

3C 

03 

67 

3C 

60 

03 

A9 

OI 

1348 

FE 

OO 

69 

OO 

oo 

9D 

3C 

03 

14CO 

54 

41 

4C 

4F 

C7 

43 

4F 

4C 

1060 

22 

OO 

76 

10 

05 

00 

99 

63 

1  1D8 

20 

BD 

FF 

69 

OE 

60 

60 

62 

1350 

4C 

71 

FE 

oo 

20 

3F 

FF 

oo 

14CB 

4C 

45 

43 

D4 

44 

4C 

4F 

41 

1068 

35 

29 

22 

I  1 

54 

4B 

4F 

4D 

1  1E0 

06 

20 

BA 

FF 

20 

CÜ 

E  F- 

A9 

1358 

20 

EF 

FE 

OO 

69 

OO 

OO 

9D 

14D0 

C4 

44 

53 

41 

56 

CS 

48 

45 

1070 

41 

53 

20 

49 

45 

4F 

52 

59 

11  ES 

08 

20 

84 

FF 

69 

60 

20 

96 

1360 

3C 

03 

20 

4E 

FF 

OO 

D<' 

29 

14D8 

41 

44 

45 

02 

49 

4E 

49 

D4 

1070 

22 

00 

93 

to 

06 

OO 

9E 

32 

1  IFO 

FF 

69 

OO 

OO 

85 

90 

AO 

03 

1368 

4C 

71 

FE 

OO 

20 

ED 

FE 

OO 

14EO 

4B 

49 

4C 

CC 

4F 

46 

C6 

32 

1000 

35 

36 

6C 

C2 

20 

34 

34 

29 

1  1F8 

BC 

3C 

03 

20 

65 

FF 

85 

FD 

1370 

69 

OO 

00 

9D 

3C 

03 

20 

29 

J4E8 

45 

4£ 

4| 

4D 

CS 

33 

43 

52 

lOBB 

66 

C2 

29 

34 

33 

29 

66 

31 

1200 

64 

90 

DO 

39 

20 

A5 

FF 

85 

1378 

FF 

OO 

20 

16 

FF 

OO 

60 

oo 

14FÜ 

41 

54 

43 

CS 

53 

45 

4E 

C4 

1090 

34 

38 

OO 

OO 

OO 

65 

2D 

85 

1208 

FE 

64 

90 

DO 

30 

6C 

3C 

03 

1300 

OO 

B9 

3C 

03 

FO 

06 

20 

68 

14FB 

53 

54 

41 

54 

53 

03 

00 

OO 

1098 

22 

65 

2E 

05 

23 

65 

37 

05 

1210 

08 

DO 

E5 

6ó 

FD 

65 

FE 

20 

1388 

FF 

ce 

90 

F5 

20 

6E 

FF 

20 

1500 

D7 

FC 

OO 

EF 

FC 

OO 

6C 

FD 

IOAO 

24 

65 

38 

B5 

25 

60 

00 

65 

1218 

CD 

DD 

20 

78 

FF 

OO 

20 

65 

1  390 

92 

FE 

OO 

FO 

03 

20 

92 

FE 

1500 

OO 

72 

FD 

OO 

60 

FD 

oo 

CO 

1008 

22 

DO 

02 

C6 

23 

C6 

22 

91 

1220 

FF 

66 

9U 

DO 

19 

C9 

00 

00 

1398 

oo 

4C 

74 

C4 

69 

08 

85 

BA 

1510 

FD 

00 

FD 

FD 

00 

03 

FE 

OO 

IOBO 

22 

DO 

3C 

165 

22 

DO 

02 

C6 

1228 

FO 

OE 

20 

□  2 

FF 

20 

El 

FF 

1  3A0 

20 

B4 

FF 

69 

6F 

20 

96 

FF 

1510 

06 

FE 

OO 

OB 

FE 

OO 

53 

FE 

IGBS 

23 

C6 

22 

B1 

22 

FO 

21 

05 

1230 

FO 

OD 

20 

66 

FF 

OO 

4C 

42 

1360 

AO 

OO 

OO 

20 

65 

FF 

99 

3C 

1520 

00 

68 

FE 

oo 

88 

FE 

oo 

00 

1 OCO 

26 

65 

22 

DO 

02 

C6 

23 

C6 

1238 

FD 

oo 

20 

75 

FF 

OO 

60 

02 

1380 

03 

ca 

C9 

OD 

DO 

F5 

A9 

oo 

1528 

OO 

OO 

OO 

OO 

OO 

OO 

OO 

A6 

toce 

22 

RL 

22 

IB 

65 

24 

66 

65 

1240 

DO 

BB 

69 

OÉ 

20 

C3 

FF 

20 

1  3B8 

00 

99 

3C 

03 

20 

6B 

FF 

60 

1  ODO 

26 

65 

25 

49 

65 

37 

DO 

02 

1240 

CC 

FF 

4C 

74 

C4 

20 

2C 

FF 

13C0 

OO 

oo 

A9 

30 

D9 

3C 

03 

DO 

1OD0 

C6 

W 

C6 

37 

68 

91 

37 

BA 

1250 

00 

4C 

74 

C4 

A5 

28 

85 

FB 

1  3CB 

06 

ce 

D9 

3C 

03 

FO 

15 

20 

_ 

1OE0 

48 

65 

37 

DO 

02 

C6 

38 

C6 

1258 

65 

2C 

05 

FC 

20 

ED 

FE 

OO 

1  300 

24 

FF 

OO 

20 

CC 

FF 

20 

75 

t  OES 

37 

60 

9J 

37 

18 

90 

B6 

C9 

1260 

20 

D8 

FE 

OO 

69 

oo 

OO 

66 

13DB 

FF 

oo 

A9 

3C 

60 

03 

20 

1E 

ÍOFO 

BF 

DO 

ED 

65 

37 

B5 

33 

65 

1268 

FB 

64 

FC 

20 

D5 

FF 

20 

33 

I3E0 

CD 

68 

60 

4C 

74 

C4 

60 

20 

1OF0 

30 

85 

34 

6C 

37 

OO 

BF 

62 

1270 

CS 

65 

22 

66 

23 

18 

69 

02 

13E0 

29 

FF 

OO 

86 

A2 

3C 

60 

03 

llOO 

OO 

00 

AO 

00 

00 

BD 

93 

FF 

1278 

es 

2D 

90 

01 

E8 

86 

2E 

20 

13F0 

20 

BD 

FF 

69 

08 

AA 

60 

oo 

1 109 

OO 

FO 

07 

99 

TE 

OO 

oo 

ce 

1280 

59 

C6 

4C 

B8 

FD 

OO 

20 

ED 

13F0 

OO 

84 

90 

4C 

BA 

FF 

62 

OO 

1110 

E0 

DO 

F4 

4C 

74 

C4 

BO 

06 

1288 

FE 

OO 

20 

08 

FE 

OO 

65 

2B 

1400 

oo 

86 

B7 

20 

79 

OO 

OO 

FO 

1110 

C9 

20 

FO 

32 

38 

£9 

30 

30 

1290 

85 

FB 

A5 

2C 

85 

FC 

69 

FB 

1408 

1F 

C9 

22 

DO 

18 

E6 

76 

OO 

1  120 

£9 

DO 

0D 

FD 

FF 

OO 

08 

68 

1290 

66 

2D 

64 

2E 

20 

DB 

FF 

20 

1410 

02 

E6 

70 

60 

OO 

OO 

Bí 

78 

1  L  28 

SD 

PC 

FF 

oo 

8E 

FE 

FF 

OO 

1260 

24 

FF 

00 

20 

92 

FE 

00 

4C 

1418 

FO 

06 

C9 

22 

FO 

06 

9D 

3C 

J  130 

8C 

M 

FF 

B6 

FD 

OI 

OI 

1208 

74 

C4 

20 

39 

FF 

OO 

20 

EF 

1420 

03 

EB 

DO 

E0 

E4 

B7 

FO 

OI 

I  1  38 

C9 

SC 

DO 

07 

BD 

02 

01 

C9 

12B0 

FE 

OO 

20 

73 

OO 

OO 

C9 

2C 

1428 

60 

68 

60 

4C 

08 

CF 

69 

00 

I  140 

C4 

FO 

12 

AC 

FF 

FF 

00 

6E 

12B8 

DO 

2D 

9D 

3C 

03 

E8 

20 

73 

1430 

20 

B 1 

FF 

69 

6F 

4C 

93 

FF 

1140 

FE 

FF 

OO 

6D 

FC 

FF 

oo 

40 

I2CO 

OO 

OO 

C9 

49 

DO 

22 

20 

73 

14  38 

69 

08 

4C 

C3 

FF 

69 

49 

2C 

1150 

AD 

FD 

FF 

(M.I 

28 

60 

4C 

73 

I  2C8 

OO 

00 

FO 

ID 

9D 

3C 

03 

E8 

1440 

69 

56 

48 

20 

16 

FF 

OO 

68 

1  158 

OO 

oo 

6D 

FC 

FF 

OO 

46 

90 

12DO 

20 

73 

OO 

OO 

FO 

14 

9U 

3C 

1440 

20 

68 

FF 

4C 

AE 

FF 

69 

4E 

36/Com modore  World  Marzo  1984 


VIDEO  CASINO 

Batalla  Naval 


Estrategia  de  Vida  o  Muerte 
en  Alta  Mar.  ^ 


- 


Si  te  gusta  la  estrategia 
naval  o  simplemente  quie¬ 
res  mejorar  tu  puntería,  in¬ 
tenta  navegar  por  los  mares 
de  este  juego. 


VIC  20 

COMMODORK  64 


El  juego  “Batalla  Naval”,  para  un 
jugador  en  el  VIC-2G  no  ampliado,  se 
basa  en  el  popular  juego  de  "‘Bar- 
quilos”,  El  jugador  tiene  que  hundir 
los  barcos  que  pertenecen  al  ordena¬ 
dor  antes  de  que  éste  hunda  los  del 
jugador. 

El  jugador  y  el  ordenador  tienen  al 
principio  del  juego,  cinco  barcos  cada 
uno,  colocados  sobre  un  tablero.  A 
continuación,  se  presentan  los  nom¬ 
bres  de  los  barcos  y  el  numero  de 
veces  que  hay  que  alcanzarlos  para 
que  se  hundan: 


—Portaaviones 

5  veces 

— Acorazado 

4  veces 

—Crucero 

3  veces 

— Submarino 

3  veces 

—Destructor 

2  veces 

AI  iniciar  el  juego  el  jugador  tendrá 

que  elegir  entre  unos  niveles  de  difi¬ 
cultad  del  uno  al  tres.  En  el  nivel  uno» 
el  jugador  y  el  ordenador  disparan 
una  vez  cada  uno.  En  el  nivel  dos,  el 
ordenador  dispara  dos  veces  y  el 
jugador  una.  En  el  nivel  tres,  es  casi 
imposible  que  gane  el  jugador,  ya  que 


el  ordenador  dispara  tres  veces  y  el 
jugador  una.  La  única  oportunidad 
que  tiene  el  jugador  de  ganar  es  tener 
suerte  y  poder  encontrar  los  cinco 
barcos  enemigos  en  seguida.  El  orde¬ 
nador  dispara  al  azar,  pero  nunca  da 
dos  veces  en  el  mismo  sitio. 

Después  de  elegir  el  nivel  de  dificul¬ 
tad,  el  jugador  coloca  sus  barcos  en  el 
tablero.  El  ordenador  le  pide  al  juga¬ 
dor  que  le  dé  una  coordenada  inicial 
para  ei  Portaaviones.  El  jugador 
introduce  una  coordenada  con  el 
siguiente  formato:  una  letra  de  A  a  J 
seguida  por  un  número  de  0  a  9  (por 
ejemplo,  D7  o  JO).  A  continuación,  el 
ordenador  le  pide  al  jugador  que  entre 
una  H  o  una  V  para  indicar  si  el  barco 
se  tiene  que  colocar  en  posición  hori¬ 
zontal  o  vertical. 

Si  el  jugador  da  una  coordenada  no 
correcta,  o  intenta  colocar  un  barco 
encima  de  otro,  o  trata  de  situar  un 
barco  de  tal  forma  que  se  sale  del 
tablero,  el  programa  le  dirá  “Mala 
Coordenada”  y  volverá  a  empezar. 
Las  coordenadas  del  barco  se  dibujan 
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en  el  tablero  a  medida  que  vayan 
introduciéndose. 

Después  que  el  jugador  haya  colo¬ 
cado  sus  barcos,  el  ordenador  situará 
los  suyos.  El  jugador  no  los  puede  ver, 
dado  que  se  representan  con  caracte¬ 
res  programabas  que  tienen  el  mismo 
aspecto  que  los  que  forman  el  tablero. 

La  Batalla  Comienza 

Cuando  el  ordenador  termina  de 
situar  sus  barcos,  le  pide  ai  jugador 
que  le  indique  las  coordenadas  del 
primer  disparo.  A  continuación,  dis¬ 
para  el  ordenador.  Tanto  los  disparos 
acertados  como  los  fallados  se  repre¬ 
sentan  en  el  tablero.  Si  se  hunden 
primero  todos  los  barcos  del  jugador, 
el  ordenador  dice  ‘"¡Gano  YoV'  y  le 
enseña  la  posición  de  sus  barcos  al 
jugador.  Cuando  el  jugador  alcanza  o 


La  labia  1.  Una  idea  general  del  listado  de  programa  para  'Batalla  Naval” 

Lineas 

50  Bajar  parle  superior  de  memoria  y  realizar  procesos  aleatorios 

60-80  Establecer  caracteres  programabas 

9Ü  Fijar  colores:  indicar  al  ordenador  que  busque  la  información  de  caracteres  en 

la  RAM 

100-120  Fijar  nivel  de  dificultad 

130  [metalizar  variables 

140-200  Dibujar  representación  en  pantalla 

210-160  Colocar  barcos  amigos 

370*440  Colocar  barcos  enemigos 

450-580  Jugador  dispara  a  los  barcos  del  ordenador 

590-670  Dispara  ordenador 

680-700  Representar  mensajes  de  barco  alcanzado  y  barco  hundido 

710-750  Fin  de  rutina  de  juego 

760  Borrar  parte  superior  de  pantalla 

770  Mensaje  de  mala  coordenada 

780  Cronometrar  representación  de  mensaje  y  luego  borrar 

790  Rutina  de  sonido  para  los  disparos 

800  Borrar  el  tablero  del  enemigo 

810-820  Rutina  de  sonido  para  blanco  alcanzado 

830  Representar  blancos  alcanzados 

840  Nombres  de  barcos  y  disparos  que  faltan  para  hundir  barco. 


Listado  i .  Batalla  Naval  VIC-20 
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BATALLA  NAVAL 


hunde  uno  de  los  barcos  del  ordena¬ 
dor,  éste  le  índica  cuál  es. 

Una  característica  interesante  de 
este  Juego  es  la  forma  en  que  el  orde¬ 
nador  sigue  la  pista  de  la  colocación 
de  los  barcos.  Se  utiliza  la  memoria  de 
pantalla  para  almacenar  la  informa¬ 
ción.  El  programa  le  permite  al  orde¬ 
nador  hacer  un  “PEEK"  solamente 
en  las  posiciones  que  han  sido  alcan¬ 
zadas  por  un  disparo.  Por  lo  tanto,  el 
ordenador  no  puede  hacer  trampas 
mirando  la  pantalla. 

Dado  que  los  barcos  tienen  diferen¬ 
tes  códigos  de  pantalla,  el  ordenador 
sabe  cuándo  un  disparo  ha  dado  en  el 


blanco  y  qué  barco  ha  sido  alcanzado. 
Esto  demuestra  que  la  memoria  de 
pantalla  realmente  se  localiza  en  la 
RAM  y  que  puede  ser  utilizada  para  el 
almacenamiento  de  datos  además  de 
la  representación  de  caracteres, 

5K  es  Suficiente 

Yo  escribí  este  programa  a  raíz  de 
que  un  amigo  me  dijo  que  no  se  podía 
hacer.  El  se  había  comprado  un  orde¬ 
nador  que  no  era  de  Commodore  y 
para  el  cual  estaba  escribiendo  una 
versión  de  este  juego.  Se  tropezó  con 
un  pequeño  problema  de  programa¬ 


ción,  y  yo  le  comenté  que  no  hubiera 
tenido  dicho  problema  si  se  hubiera 
comprado  un  VIC- 20. 

El  opinaba  que  el  5K  de  memoria 
RAM  del  VIC  no  seria  suficiente  para 
este  juego.  A  mí  se  me  presentó  una 
buena  oportunidad  para  saber  exac¬ 
tamente  la  capacidad  de  los  3583 
bytes  disponibles  en  el  VIC.  Yo  creo 
que  este  juego  demuestra  que  se  puede 
hacer  mucho  dentro  de  las  limitacio¬ 
nes  del  VIC.  Aunque  ahora  dispongo 
de  una  ampliación  de  memoria  de 
lóK,  sigo  realizando  el  90  por  ciento 
de  mi  trabajo  en  el  5K  de  memoria 
original. 


EN  TARRAGONA ... 


INFORMATICA 

PERSONAL 


commodore 

COMPUTER 


CBM64 

VIC-20 


CURSOS  DE  PROGRAMACION 
PERIFERICOS  VIC/CBM-64 


*  TODA  CLASE  DE  ACCESORIOS,  CONECTORES,  ETC. 
TECNHEL  S.A.  de  Ingeniería  NIF  a43036094 
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club 

commodore 


Compartiendo  Experiencias 
entre  amigos 


sta  sección  esté  dedicada  a  la  colabora¬ 
ción  de  todos  nuestros  lectores  y  está 
dividida  en  dos  partes: 

I j  Programación : 

Programas  y  similares 
2)  Magia: 

Trucos,  sugerencias,  etc. 

Habrá  premios  y  alicientes  "para 
todos  los  participantes”  (ver  editorial 
página  3). 


Todas  las  colaboraciones  deben  venir 
escritas  a  máquina  a  doble  espacio  y  los 
programas  grabados  en  cinta  (si  es 
posible),  o  con  el  listado  completo  en 
impresora.  Nuestros  lectores  más  jóve¬ 
nes  pueden  escribir  a  mano  pero  con 
letra  muy  clara. 

Enviarnos  vuestra  dirección  para  que 
podáis  poneros  en  contacto  unos  con 
otros . 


Incluimos  hoy  dos  colaboraciones  de  dos  chavales  a  ver  si  a  los  demás  se  les  quita 
el  rníedo  y  nos  envían  cosas.  Topo  Loco  ya  apareció  anteriormente  en  Club 
Commodore. 

Asi  que:  ¡animaros,  chicos  (...y  chicas)! 
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“Topo  loco” 


¡Hola! 

Soy  un  vic-cioso  de  Barcelona.  Recibo 
“Club  Commodore"en  mi  casa  cada  mes 
y,  como  pedís  colaboraciones,  os  mando 
este  programa  de  juegos. 

Mi  nombre  es  Manuel  Torralba  y  tengo 
13  años.  (La  certa  la  ha  pasado  a  máquina 
mi  hermano  mayor,  que  ha  corregido 
todas  (o  casi  todas}  las  faltas  y  ha  puesto 
el  rollo  chulo.  EL  PROGRAM  A  ES  MIO, 
LO  HE  HECHO  YO  SOLITO  Y  NADIE 
ME  HA  AYUDADO.  (¡Es  que  nadie  se 
cree  que  yo  pueda  programar  así!}. 


El  juego,  que  va  en  la  cassette  que  os 
adjunto,  se  llama  “Topo  Loco**.  No  nece¬ 
sita  ninguna  ampliación  de  memoria.  El 
jugador  debe  “limpiar"  el  huerto  (La  pan¬ 
talla}  de  lechugas  (representadas  por  tré¬ 
boles)  sin  chocar  con  los  bloques  grises 
que  hay  por  todo  el  huerto,  ni  tampoco 
con  el  rastro  que  deja.  Cuando  acabas  un 
huerto  pasas  a  otro,  y  así  sucesivamente 
hasta  agotar  los  tres  topos  que  posees. 
Para  hacerlo  más  difícil,  la  velocidad  del 
topo  se  incrementa  poco  a  poco  y,  por 
cada  huerto,  el  número  de  bloques 


LISTADO 


PROGRAMA  t  10TQFQ1 


0  RE n«**« ****•**«*•• 


1  REN*  TOPO  LOCO  * 

2  REM* - • 

3  RE**  MANUEL  * 

4  REI**  * 

5  REtW  TORRABA  * 

6  RE  A* ****** ******** 


7  NN=1  iGUS«3aGOSU©3000 

B  PÜKE3G079,SíFORT-lTÜ5íFORR=lTO2ie 
iNEXTR iPR  JHT  H [  CLR  3* 

9  FQRR=lTD2l0afCXTíPRINTM[HÜME  JCCRSRÜ3 
C CRSRO  3 1  CRSRÜ  H  CRSRÜ  3  C  CRSRÜ 1 1 CRSRÜ 3 

C CRSRO 3  t  CRSRO 3  t  CRSRÜ  3  t CRSRÜ 3  t  CRSRÜ  3 
C CRSRR  3  tCRSRR  3  C  CRSRR  3  C  CRSRR  3 HUERTO" 
íMH  iNEXTT 

10  LECW*15iRÜKE36079,0¡PRINr*[  CLR  3 
w  *PQÍ<E3607S,  15 

11  P0KE36e79,SíPRINT"r  CLR  J'iFORL- 
1T015+PÍ  íPOKE7600+rNT<RND<l  >*506>,  1 
02  t MEXTL 

12  FORL-lTOLECHjPOKE7600+rNT<RNCK  1 > 

«9K)#68 

13  PCKE36O?a,Í3iROK€36e76,0tFaR£»ÍT 

0120  iNEXTE  aPCtíE 36076, 235+ L  ¡HEXTL 

14  FÜRE™ 1 1 020© sMEXTE 

20  B«O:M«*0íX*18iY-10íC-253 
25  GETTECL M 

30  lFTECLfl*»""THENGOTt»8 
40  ÍFTECLA*-"  "TFENH-  í 
50  IFTECLfl*“"IpTHEHM-2 
m  IFTECLfl»-,,J"THEf0f-p0 
70  JFTECLR**  "L  *  TMEh01"3 
00  IFM*0THENX-XM 


01  POKE3607S, 15iPOKE36076,130 
30  [FH-tTHENY-V+1 
10©  1FH-2THENY-Y-1 
110  ÍFH-3nCNX-X+i 

1 20  I FPEBC  C  7600+22* V  +X  >  <  >88HNDPEE  K  < 
7660+22* V+X > O 32THEN  GOTO  150 

121  IFPEEKí  7600+22* V+X  ><>0STNEH  GOT 
OL30 

1 22  PÜKE360 70 , 1 5  ? FQRH* i 50TÜ256  tPOKE 
36876 ,  N  i  NEXTM  (POKE36874 , 0  tSC-SC+20 1 
LECH-LECH- l 

123  tFLECH-0THEMOOT 00000 
130  FWE7680+22*V+X,0J 

135  FÜRA«lTQe:NEXTA:B-©-0,2 
140  RüKE36S76,BíG0T025 
150  RÜKE76O0+22*V+X,42 
155  POKÉ36S7B, 15 

160  POKE36076,0 

161  FOR  ñ-l5TO0STEP-0,08liC*C-l3POK 
E 36070 ,fl (POKE36073 ,C  JPOKE36077, 1 80  i 
hCXTR  i  POKE36077 , 0 

162  GUS-CUS-1 

163  lFOUS-0T>e:N9019 
160  OOTOll 

190  POKE36S7B,l5 

1015  FORR=lTO100fMEXT 

3000  PRINT-C  CLR  3"!POKE36079,0iPaX 
E 36065, 140 

3010  PR I NT * t CRSRO H CRSRÜ 3 í  kWT  3  C  CRSRR  3 
t CRSRR J**T 0P0  LOCO**  p  |PRÍNT-CCR5RÜ3 

[  CRSRÜ  JC  CRSRR  3  NUEVE  AL  TOPO  LOCO  “ 

3011  PR I NT pt CRSRÜ 3 tCRSRR 3 Y  COME  TOO 
RS"  i PR I NT pt CRSRÜ 3  tCRSRR 3 LAS  LECHUGA 
SCCSHIFXI> 

3012  PR í NT p { CRSRÜ 3  t CRSRR  J EVITANDO  C 
HOCAR" 


Manuel  Torralba 
13  anos 

mándanos  dirección 


aumenta  en  cinco,  Y  además,  aunque  me 
parecía  difícil,  le  añadí  música,  color  y 
sonido. 

A  continuación  os  explico  el  programa: 
Linea  1: 

Define  el  número  de  topos  y  huertos  y 
continúa  en  la  línea  3000. 

Línea  8  a  9: 

Ponen  en  pantalla  el  número  de 
huertos. 

Línea  10: 

Define  el  número  de  lechugas. 


3020  PR I NT “C CRSRÜ ICON  TU  RASTRO  0  L 
OS t CRSRR 3 [ CRSRR 1 t CRSRR H CRSRÜ 3 0L 0QU 
ES  GRISES" 

3021  PR]NTP  [  CRSRÜ  3  C CRSRR 30 IR 1 GE  EL 
TOPO  CÜN“ 

3022  PR I NT  *  t  CRSRÜ  3  C  CRSRR  3  t , J,L , tRVSON] 
SPflCEtRVSOFJ" 

3030  PR  INF  M[  CRSRD3  f  CRSRR  3  POR  M,  TO 
RRALBA  " 

3060  FORftL TURA- 140  TO  40STEP-0. 1 1 :P 
OKE 36865 ,  AL  TURA  :  ME  XTHL  TURA 

3090  FÜRRl*lTÜ3000;NEXTRl  :PQKE198,0 

3091  PRÍ NT"t  CLR  ircRSRfnCCRSROHCRSROT 
[ CRSRO  3  C  CRSRO  3  í CRSRO  3 1 CRSRÜ  3  f 1  ES  E 

L  MAS  DIFICIL  >" 

4000  JNPUT"[HÜME  ) C  NHT  I [CRSRÜ] C CRSRO 3 
C CRSRÜ 3 C CRSRO 3DIF1CULTAQ  ÍÍ-10>wíO 

4610  D=ü»15  iRETURN 

9000  POKE36070,15 

90Í1  FCWR-1T034  iREAÜT :PÜ*E 36076, T s 
P0KE36879 . T :FORM= 1 TOl 50 ; NEXTM sNEXTR 
XRESTORE 

9012  P1-P1+5:MN-MN+L iGOTÜS 

9019  PC*:E3697B,  15 

9020  F0RU-ITü34iREA0AíNEXTU 

9021  PÜKE36S79,©;  FORESTO  19  iREADT i 
POKÉ36076 , T ;FÜRM= 1 TO 1 50 ! NEXTW  a  NEX  TR 

9022  PR I NTJ"  [  HOME  1  [  CRSRR  3  t  CRSRR  )  C  CRSRR  3 
[ C RSRR 3 C  CRSRR H C RSRR I í CRSRR 3 T CRSRÜ J 

[ CRSRO H CRSRÜ 3 f CRSRÜ 3 t CRSRÜ 3 t CRSRÜ 3 
CCRSR03GAME  0VER" iFÜRR^ 1 TQ3080  aMEXT 
RiRUN 

20O00  00100,0,8,  195.209,209,215,219 
,209,2 19,215 

29010  0A T  A 1 95  , 209 , 209 ,215,219, 209 , 2 
09.207, 209,209,215,219,221 ,219,215 

20020  DATA209, 207, 195, 201 ,207,209,2 
09,8,8 

20030  OATA0, 0,225,223, 0,219, 215, 0,2 
09,207,201 ,207,201 , 195,0,0,225,0 

REAOV. 
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Línea  9019  a  9021: 

Música  de  íin  de  juego. 

l  inea  9022: 

Mensaje  fin  de  juego. 

Línea  20000  a  20030: 

Dalas  musicales. 

Principales  variables:  número  de  Injer¬ 
ios  (mn),  número  de  topos  (gus).  número 
de  lechugas  (lechL  velocidad  ib),  bloques 
adicionales  (p(L  posición  del  topo  (X  c  V  i 

Esperando  noticias  vuestras,  se  despide 
un  colaborador. 


Linea  130: 

Pone  al  topo  en  su  posición. 

Linea  135: 

Retardo  (velocidad). 

Linea  140: 

Vuelve  a  la  linea  25. 

Linea  150  a  168: 

Explosión  v  un  topo  menos.  Cuso  de  0 
topos,  pasan  a  la  linea  9019, 

Línea  3000  a  309(1; 

Instrucciones. 

Linea  4000  a  4010: 

Piden  nivel  dificultad. 

Linea  9000  a  9012: 

Música  éxito  (huerto  vacio). 


Línea  II  y  12: 

Colocan  las  lechugas  y  los  bloques  en  su 
lugar. 

Linea  20: 

Define  velocidad  de  juego,  posición  XY 
y  la  variable  de  color. 

Linea  25  a  1 10: 

Movimiento  dd  topo. 

Linca  1 20  y  121: 

Comprueban  qué  objeto  tiene  delante  el 
Uípo,  Si  es  un  bloque,  pasa  a  la  lírica  150. 

Linea  122: 

El  topo  ha  encontrado  una  lechuga. 
Linea  123: 

Caso  de  0  lechugas,  pasa  a  la  línea  9000. 


Mane! 


Funny  Faces 


Iñigo  Fry 

Maestro  (  hapL  15 
MADRID- 16 


14  años 


Esto  no  os  lo  explico  porque 
'  es  tan  tonto,  tan  tonto, 
tan  tonto,..!  Que  os  divirtáis 
con  los  muñecos  que  hacen 
cosas. 


1®  WlHT-lCLPJtStPSRBr 

20  PRINT " E 1  BSPCl  [ 6HÍFTU 3 1 4C0HM+  3  ESPIFT I  )“ 

38  P«IMrT*,Cl®3iK:ns*+lFT|iK4SffCUSMIFrBV 
48  PRlWT-t  t05P£3ESHlFTBW29PC JOMWFTW 
58  PltlTíT N E  JSSPCUSHLFTfKíSFC  HCOnWUSPCKSHIFTBJ» 
e'PIH'THM^P‘;][^HlFTBJ[4ÍPCKSHlFTB3H 
78  PPlHT"£l0£PCKSHlr  TBKSHIFTM3  £  2tüHriP  3  LSHIFTMJ  £  SHIFTBr 
75  PP1NT"  £  tíSFCHSHlFTB]  [4SPC 1CSHIFT»] " 

PPIHTH  [  Í&BPCHSHIFTJ  3  £  iHJFTC  H  CQrfiSJ  ( CQHPW  JCSHIF  tC  3  ESHl  FTf  J- 
90  PPlNTpt  l£SPCUSHlFT*3CSHIFT!Lír2Sf,C3" 
lee  pft  INT-  C I2SPC  3  £S*|FTt  M  SHIFTH]  ££5PC  1 p 
118  FOPY-0TQ5W 

120  P1?SHT"EH0nJ£  HCPSftPJ-- 

t  30  NE^TT 

t49  i  'P I MT "  £ 80H 1  £  1 2CRSR D  3  £  1 1 C P3PP ] 0 " 

líe  FORT-etoiíw  hd:tt 

155  &QS UB2M 
[68  tc-:rv 

PRIHT*CMmCl6C8SR«nSCP«M)lSH!FTJ]'[SMir  t*  1 
¿lü  FOT  ■870408  MEXTT 

228  PfilNT-CttiMJt  \ SÍR ÍPD !  L 12CR3FP  3t2SPC3 " 

¿38  CFT-eTOiSOe  NEaTT 
¿35  QO8US300 
>49  R£TU«H 

3W  PRlNVÍHOHlESLPSIi®!" 

385  PRINf  CJSSPCJtWTFTHHSHI  TNatiSPCP 

?se  PRtHTHU3SP(:3tSmFTrt2CShIFTM]E2SPCJriHIFTnitSF>t3'' 

317  PRIUr^U+SPCJr^JIFTttJCÍSPCJtSHlFr  jjtSPCJ" 

X2Ü  PRIHT"[  10SPÍ31 SMIFTCJ C4C0«M*]C6Kl FtMK.-.^lFTN 3 r J" 

33C  FPlHT''n0SPC][SH£fmU0FC  HSHIFTBKWIFTH]  E¿3PCl" 

348  PRlHTtaneSPC  JCSHIFTBJ0L£SFC30r^HirrBJtSPí:  Ul'Mim  1- 
35®  Pí -iMT-nflSFC  )fSMIFTí][¡r.priiCífliiGltSFCJ4SMlFTB3[¿9KU,SHIF  J- 
P9  [NT“-[  I0SPC  ) i SHIFTB 3  £  45PC  J I SH I  F  TJltaSPC  J 1  SMÍFtT  : " 

378  PÜ!  1  * 1  f  "  [  1 0Sf*C 1 E  SKlFTBJE  SHI FTM  J f  ¿t,  CWP ]  £9ftl  F  TH  J£  jH I  f  IftJt  ¿SPCJCtt'HHÚJ'1 

375  PRJNT-Cl8SFC3[SWIFTf:JE4SP:  KSHlFr6Jt3K  E  SHIFTN  )£  ■  fr  r 

fó0  FPimF*E1QSP£]ESM]Fmt$H[fTtKC’Jt0'S)£CanmJ[SHlFTC3t$H!fíTt'  JtWIFTHJU-  t 

398  Ft^íT'ttaSPCJCSHJFTtJlSHtFTLJtCOMmJlCSHtFTNJt^SF'’.  r 

:i?5  PPINT*li29PClt$HlFTIOC3HIFTNl£KPi  lh 

498  FQfiT-GTCl  TM  NEKT T 

580  PF■I^^T"C>^WHStPSPIíJ*, 

585  PPINT-U9SFG1" 

516  PPINT’T  U&PVÍl 4i:01»1»)L45PCJ h 

517  reiHT ■  £  1 ISFGHCQMnG )[£SP:  JtCüfWtJ£43Pt  3  “ 
PRIHT-CÍSPClCCOnnPUCOttlíStSHtFTeJUCOrwJ^Hin'f  JL03ftH3£C'3MMP3r  ■  fi  ? 

?38  PPIKT1  C  I05PC KSHIFTB3  C4SPCUSHIFTB  3  £  '^P-:  3  " 

548  F>PIMT‘,E10SPClISH]FTB3Or¿SFC3OtSHim]í  iSP L3" 

459  PFrHr'riTCPCiMHlFTBJtZSFCJtCOfMUtSFC  JL3HIFTO  11  Í5FC  í" 

568  PP 1  MT H £  1 &SPC 3 £SH  1 FTB J £ 45PC  ]  C  SU  1  FTJf  3  í 3SPC 3 “ 

579  PPIMr,'El0SPC3[$HlFTB3tSHlFTrt]t£CO«nP]t5HjnH3[  .  HJF  T  B  j  £  :?Ji  \ 

575  PPUfT*nB&»C3ES«IFTB3£4SPt  H  SH IF  TB  J  t3$F*C  í  " 

588  P*tMTwnftSPC3ISHIF7J3[SHIFTC]teOWt83i:eC»lHfl3fSMTFTCj[ÍHIF  T>  JC  PeJ* 

5^  PFlMT-UÍSPCJrSH’FTSÍÍSHlFTLJESSKJ 
608  «UHT-Cl¿SPCK8HlFTím-5HtFTrtl[5SPC]- 
¿10  R£TURN 


Relación  de  Tiendas  en  Madrid 
donde  se  Vende  ya  MicroSistemas 

COMPU-SHOP . Infanta  Mercedes,  89 

COMPUSTORE  . Doce  de  Octubre,  32 

COMPUSTORE  . Sor  Angela  de  la  Crux, 

COSESA . . Barquillo,  25 

DIDISA . . Pintor  Rosales,  26 

ELECTRONICA  SANDOVAL  Sandoval,  3,  4,  6 

MICROTEC  . Duque  de  Sesto,  30 

PEÑA,  Librería  . Cavanilles,  52 

SINCLAIR  STORE  . Bravo  Murillo,  2 

VIDEO  MUSICA . Orense,  28 
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C* 

BLANCA 


Tengo  un  micro  ordenador  Commodore 
64  y  el  Floppy  1541 . 

Asi  mismo  les  ruego  me  proporcionen 
información  sobre  los  progromos  EASY 
5CRIPT  y  CALL  RESULT,  y  cualquier  otro 
programo  de  proceso  de  do  ios  y  sobre 
idiomas,  siempre  refiriéndome  poro  diskette. 

JESUS  UGARTE  UGARTE, 

LEON  Y  CASTILLO ,  2 28  ATICO  X, 

LAS  PALMAS-4 

En  este  numero  publicaremos  rese¬ 
ña  sobre  EASY  SCRIPT. 

Ver  galería  de  Soft  [página  2),  en 
el  próximo  publicaremos  un  amplio 
artículo  sobre  el  mismo.  Tomamos 
noto  sobre  CALL  RESULT. 

Sería  interesante  que  la  revista  no  se  tec- 
nrficase  excesivamente  pues  se  convertiría 
en  incomprensible  paro  la  mayoría  de  Jos 
usuarios  de  Commodore  que  creo  somos 
simples  aficionados  y  no  técnicos,  también 
sería  bueno  poro  nosotros  que  se  tocasen 
algunos  POKES  de  direcciones  de  memoria 
en  cada  revísta  para  que  se  fuese  desve¬ 
lando  este  verdadero  misterio  pora  los  afi¬ 
cionados,  lo  que  podio  hacerse  con  peque¬ 
ños  pro  gromos  que  nos  mostrasen  su 
aplicación  prácticamente. 

Seria  conveniente  también  que  se  explica¬ 
sen  paulatinamente  los  conceptos  de  buffer, 
puntero,  vector,  memoria  Intermedia  de 
teclado...,  etc. 

Nada  más,  reciban  un  cordial  so  ludo  de 
su  nuevo  suscriptos 

Según  podras  apreciar,  intenta¬ 
mos  dar  un  poco  para  todos,  tanto 
par  o  los  novicios  coma  pora  los  muy 
veteranos  e  incluso  para  los  niños  (a 
partir  del  próximo  ne  3¡. 

Tomamos  nota  para  comenzar  en 
nuestro  próximo  con  un  glosario  de 
términos  y  con  "el  misterio  de  los 
Pokes".  De  hecho  nos  gusta  el  tér¬ 
mino  como  título.  Te  lo  robamos. 

Con  esto  contestamos  también  a 
JOAQUIN  LOZANO  DE  VALENCIA 
que  nos  pide  un  estudio  de  la  dife¬ 
rencia  del  POKE  entre  el  VIC  y  el  64. 
Así  como  a  varios  lectores  que  nos 
han  llamado  con  la  mismo  petición. 

CONTRABANDO 

Estimados  amigos; 

Me  dirijo  a  vosotros  porque  en  fecho  no 
muy  lejano  voy  a  comprarme  un  cassette 
Commodore  paro  poder  grabar  mis  propios 
programas,  he  preguntado  el  precio  pero 
nadie  parece  saberlo,  por  eso  os  escribo 
esta  corto. 


Ya  que  vosotros  o  ustedes  lo  fabricáis, 
deberíais  sober  el  precio  exacto  en  el 
mercado. 

También  desearía  saber,  s¡  es  posible  el 
precio  en  Andorra,  Muchos  gracias. 

Noto;  Me  bo  gustado  mucho  la  editorial 
del  n°  1  de  la  revisto  Commodore  World. 

JIAfN  ARRUNTIA 
O  P/Q  X//,  13,  Esc  B  2g  C 
PAMPLONA 

El  VIC  vale  34  900,  el  C-64  79.900  y 
el  Cassette  1 2.000.  Hay  una  casa  de 
Zaragoza  B.M  que  se  anuncia  aquí 
pagina  21  Llámales. 

Oye  majo.»,  eso  de  Andorra..,,  ¡na 
pretenderás  que  te  ayude  al  contra¬ 
bando! 

RESPETO  A  LA  PROPIEDAD, 
¿CUANDO? 

Queridos  amigos: 

Ante  todo,  felicitaros  por  esta  nueva 
revisto  que  viene  o  llenar  un  hueco  muy 
impórtente  para  los  usuarios  de  Commo¬ 
dore,  ya  que,  a  pesar  de  que  lo  revisto  del 
Club  era  muy  interesante,  no  cubría  todo 
lo  que  ésta  desde  su  primer  número  pro¬ 
mete;  tengo  un  64  desde  hoce  pocos  meses  y 
toda  la  información  me  parece  poco,  así 
que  mi  felicitación  de  nuevo  y  mis  mejores 
deseos  de  éxito  que  no  dudo  tendréis. 

Con  mucho  gusto  me  suscribiría  pero  el 
buzón  de  casa  es  lo  bastante  pequeño  para 
hacerme  desistir  pues  desaparecen  o  las 
estropean  intentando  meterlas,  de  todos 
formas  os  prometo  ser  un  lector  asiduo. 

Os  acompaño  unas  pequeñas  experien¬ 
cias  mías  que  pueden  encajar  en  fa  sección 
de  MAGíA  y  en  caso  de  que  mereciera  la 
peno  publicarlas,  os  seguiría  mandando. 

DQM/NGO  MARQUEZ  GALLEGO 
PARQUE  VOSA,  3,  4*  C 
MOSTOLES  f MADRID ) 

TELEF.  6)4  2)  48 

Gracias  por  tus  palabras.  Pasa¬ 
mos  tu  receta  a  MAGIA.  ¡Ah!  y 
síguenos  mandando  cosas. 

¿CLUB  Di  INFORMATICA? 

Somos  suscriptores  suyos,  y  a  la  vez  hemos 
organizado  un  Club  de  Informática,  donde 
empleamos  ordenadores  Commodore  64  y 
Vic  20. 

Les  enviamos  folleto  del  primer  curso  que 
hemos  organizado  y  rogamos  nos  tengan  al 
corriente  de  cuanta  información  consideren 
que  nos  sea  de  utilidad. 

JAVIER  GARCÍA  DÍAZ 


A  través  del  folleto  no  estamos 
muy  seguros  sí  se  trato  de  un  Club  o 
de  uno  academia.  Tampoco  se  dice 
cuál  e$  lo  diferencia  entre  socios  y 
no  socios  ni  qué  se  necesita  paro  ser 
socios.  Ampliad  esta  información, 
por  favor.  Sí  sois  Club  os  incluiremos 
en  el  próximo  número  en  MARKET 
CLUB. 

TODO  DI  TODO 

Hola,  amigos: 

Os  escribo  atendiendo  a  la  petición  de 
sugerencias  y  opiniones  que  hacéis  en  el 
número  1  de  Commodore  World,  y  lo  impre¬ 
sión  que  he  socado  después  de  leerlo 
supongo  que  es  la  misma  de  todas  los  demás 
suscripto  res: 

¡MAGNIFICA! 

Me  parece  fenomenal,  por  ejemplo,  que 
Incluyáis  coda  mes  un  tema,  como  el  de 
generación  de  caracteres,  en  el  número  1, 
acompañado  de  un  programa  y  explicado 
exhaustivamente,  con  ejemplos,  ilustracio¬ 
nes,  etc... 

A  este  respecto,  hay  algunos  lemas  que 
me  gustaría  ver  desarrollados  en  próximos 
números,  como  puede  ser  una  explicación 
detallado  de  las  rutinas  de  KERNAL,  su 
funcionamiento,  utilidad,  modo  de  introducir¬ 
las  en  un  programa,  etc.*  todo  ello  acampa* 
ñado  de  un  programa  explicado  línea  a 
línea. 

Otra  tema  que  me  gustaría  dominar  tam¬ 
bién  es  el  de  la  composición  de  música  con 
el  conjunto  de  comandos  del  SUPEREX 
PANDER;  podéis  explicar*  por  ejemplo, 
cómo  pasar  de  lo  música  escrita  en  penta¬ 
grama  can  corcheas  y  demás  símbolos  musi¬ 
cales  O  la  notación  del  cartucho.  También 
sería  interesante  que  de  vez  en  cuando  se 
incluyera  en  lo  revisto  una  canción  popular, 
un  efecto  de  sonido*  etc...,  pora  usar  con  el 
cartucho,  todo  ello  debidamente  explicado. 

Habréis  observado  que  bogo  mucho  hin¬ 
capié  en  eso  de  explicar  lo  que  decís  en  la 
revista,  y  es  que  mi  experiencia  en  la  etapa 
anterior  de  la  revista  era  a  veces  de  quedar 
defraudado  cuando  se  tocaba  un  temo  y 
tenía  que  usar  esa  información  sin  com 
prenderla  (p.  ej.  cuando  salió  el  programa 
en  que  aparecía  BUG  en  TV*  no  entendía 
por  qué  tal  variable  tenía  que  tomar  tal 
valor,  etc...). 

También  me  interesa  mucho  el  problema 
de  cómo  borrar  parte  de  un  programa  que 
sólo  se  ha  de  utilizar  una  vez  en  él,  y  asi 
recuperar  esta  memoria  para  variables... 
Esto  ya  se  tocó  anteriormente,  pero  intenté 
aplicarlo  o  un  programa  mío,  sin  entender 
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cómo  lo  hacía,  y  no  dio  resultado,  por  eso  os 
pido  que  no  dejéis  nodo  sin  comentar,  por 
sencillo  que  perezco,  en  lo  sucesivo. 

Posondo  o  otro  orden  de  cosos,  me  gusta* 
rio  mucho  que  se  publicom  un  curso  de  pro* 
gromoción  en  lenguaje  máquina,  partiendo 
de  nivel  cero,  y  que  incluyera  programos 
explicados,  descripción  de  comandos,  etc.,. 

Os  agradecería  que  informarais  en  la 
revista,  o  a  mi  personalmente,  sobre  lo  exis* 
tencía  o  no  de  algún  curso  en  lenguaje 
maquino  editado  en  español,  pues,  que  yo 
sepa,  no  existe  ninguno,  a  pesor  de  la  gran 
demanda  que  debe  de  haber. 

Como  ya  he  visto  que  en  el  número  2  vais 
o  publicar  un  artículo  sobre  la  creación  de 
nuevos  mandatos  al  VIC,  no  os  pido  nada 
por  ahora  en  este  sentido,  pero  sí  me  gusta¬ 
ría  saber  cómo  se  hace  paro  cambiar  el 
comondo  LIST  por  LISTA,  o  READ  por  LEE, 
etc,.,,  que  tengo  entendido  que  se  puede 
hacer,  y  espero  que  lo  publiquéis  próxi¬ 
mamente. 

Siguiendo  con  la  opinión  que  pedís  en  Ja 
editorial  del  número  1f  os  diré  que  me 
parece  fenomenal  que  se  incluyan  varios 
juegos  en  cada  revista,  ya  que  un  mayor 
nivel  de  profesionalización  de  la  revista  no 
debe  estar  reñido  can  la  dedicación  de 
parte  de  ella  ql  esparcimiento  y  la  dis¬ 
tracción. 

Una  bueno  idea  por  vuestra  parte  ha  sido 
la  de  hacer  esos  sorteos  de  software  perió¬ 
dicamente,  creo  que  esto  potenciará  más  la 
participación  de  los  usuarios. 

Bueno,  por  ahora  no  os  voy  o  dor  más  el 
tostón,  espero  poder  mandar  alguna  cola¬ 
boración  un  día  de  estos,  ¡Hasta  pronto! 

FRANCISCO  SAEZ  SOTO 
O  VIRGEN  DEL  ROSARIO ,  28 
ALCANTARILLA 
MURGA 

¡Tú  te  quedas  safo  pidiendo! 

Muchas  cartas  así  y  ya  tenemos 
ideas  editoriales  para  todo  et  año. 

Me  temo  que  nosotros  tampoco 
conocemos  nada  editado  aquí  sobre 
lenguaje  máquina. 

Los  otros  puntos  que  mencionas  se 
irán  tocando  a  lo  largo  del  año. 

Mientras  tanto,  incluyo  tu  direc* 
ción  por  si  algún  lector  quiere  car¬ 
tearse  contigo  sobre  estos  temas. 

Paso  tus  recetas  a  MAGIA. 

¡Ah!  y  gracias  por  los  piropos. 

En  los  números  1 1, 1 2  y  1 3  de  Club 
Commodore  salieron  unos  artículos 
sobre  este  tema.  Pretendemos  comen¬ 
zar  un  curso  paso  o  paso  en  el  pró¬ 
ximo  número»  Asimismo  apareció 
un  mapa  de  memoria  paro  el  Vic  20 
en  ef  n-  1  en  el  que  faltaban  los 
siguientes  posiciones: 

$030C  780  almacenamiento  tem¬ 
poral  de  A  durante  SYS. 

$0300  781  almacenamiento  tem¬ 
poral  de  X  durante  SYS. 

S030E  782  almacenamiento  tem¬ 
poral  de  Y  durante  SYS. 

$0304  783  almacenamiento  tem¬ 
poral  de  f  durante  SYS. 

En  el  nQ  7  apareció  el  mapa  de 
memoria  para  el  C-64.  En  et  ne  15 
referente  a  las  tablas  de  KERNAL 
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apareció  un  artículo  con  unas  tablas. 
En  el  futuro  (no  prometo  en  qué 
número)  trataremos  este  tema  más 
a  fondo  con  ejemplos  prácticos. 

NUEVO  CiUfi 

Hoce  poco  tiempo  quedó  establecido  y 
reglamentado  el  Club  de  Programación 
Alaiz,  en  Pamplona.  Está  dirigido  o  estu¬ 
diantes  de  B.U.P,  y  C.O.U.  de  esta  ciudad,  y 
et  fin  que  tiene  es  la  introducción  en  el 
mundo  de  la  informática  y  programación 
BASIC,  No  tiene,  por  lo  demás,  ningún  fin 
lucrativo.  El  club  propiamente  posee  equi¬ 
pos  COMMODORE  ¿4,  VIC-20  y  diversos 
periféricos  (impresora,  unidad  de  disco  y 
cassette) 

Así  mismo,  dado  que  en  Pamplona  los  dis¬ 
tribuidores  no  tienen  una  gran  información 
de  bibliografía  Commodore,  periféricos  y 
Software,  y  dado  que  formamos  un  club  de 
programación  me  gustaría  nos  enviasen 
amplia  información  en  estos  campos. 

Las  actividades  que  realizamos  requieren 
esta  información  ya  que  dentro  de  los  chicos 
que  participan  los  hoy  ya  adelantados  en 
prog  carnación* 

JESUS  RAFAEL  MARTINEZ 

ESTAREMOS  EN  1NFORMAT 

Hola  omígos  de  COMMODORE  WORLD: 

Me  llamo  Ramón  y  esto  Navidad  me  rega 
laron  un  COMMODORE  VIC-20,  incluido  el 
’DATASSETTE  '.  Yo  tengo  uno  gran  afición 
a  los  "Vídeojuegos"  y  cuando  mi  hermano 
me  compró  el  "Micro-Sistemas"  N°  7,  con  el 
cual  regalaban  vuestro  primer  numero,  me 
paré  al  leer  la  editorial  yo  que  en  el  apar¬ 
tado  de  Futuro"  había  una  cosa  que  me 
interesaba,  las  consultas,  como  decío  me 
paré  pora  escribir  esto  carta,  puesto  que  me 
gustaría  que  me  enviarais  o  publicarais  en 
vuestro/nuestra  revista  información  sobre 
todos  los  Vídeo-juegos  disponibles  para 
el  VIC-20,  sean  en  cartucho  o  cassette. 

Supongo  que  tendréis  un  Stand’  en  el 
INFORMAT-84  ",  me  pregunto  si  venderéis 
Video-juegos",  "Joysticlcs '  Paddles",  car¬ 
tuchos  diversos,  etc.  Por  favor  contestadme 
lo  antes  posible,  seo  en  lo  revista  o  por 
carta,  odios  amigos, 

Gracias  por  haber  leído  esta  carta  y  hasta 
pronto. 

RAMON  PLANS  ESPERASE 
C/  CORTS  CATALANES,  N-  ó,  3M.a 
CALOES  DE  MONTBUI 
(BARNAj 

Bienvenido  a  la  familia  Commo- 
doriana,  Ramón.  Estaremos  en  Infor- 
mot-84  por  supuesto,  pero  compar* 
tiendo  el  “stand11  bien  con  la 
editorial  de  MicroSistemas  o  con 
Microelectrónica  y  Control,  todavía 
no  está  decidido.  Nosotros  perso¬ 
nalmente  no  venderemos  Soft  excep¬ 
to  los  cintas  de  programas  de  la 
revisto,  pero  seguro  que  habrá  bas¬ 
tantes  distribuidores  de  productos 
Commodore  que  muy  probable¬ 
mente  lo  anunciarán  en  nuestras 
páginas  de  abril.  Repito  tu  peti¬ 
ción  sobre  soft  en  la  columna 
correspondiente. 


ESTIMADOS  AMIGOS: 

Por  la  presente  os  remito  el  "BOLETIN  DE 
SUSCRIPCION  para  lo  nuevo'  Revisto  y 
unas  dudas  por  mi  parte.  En  el  mes  de  julio 
posado  comenzó  mí  suscripción  o  la  Revista 
CLUB  COMMODORE  '  y  por  lo  tanto  he 
recibido  ó  números  de  dicha  revista  y  el  pri¬ 
mer  número  de  esta  nueva,  por  lo  que  aún 
me  quedan  4  números  poro  acabar  con  la 
antigua  suscripción,  pero  na  he  vtsto  que 
bogáis  ninguna  referencia  a  la  situación  en 
la  que  quedamos  los  antiguas'  suscripto- 
res,  es  decir,  ¿recibiremos  la  nuevo  revisa 
igualmente  sin  mondar  la  nuevo  suscripción 
hasta  que  lo  anterior  finalice?  En  este  caso 
el  nuevo  Boletín  que  os  adjunto  podéis 
guardarlo  hasta  que  acabe  mi  suscripción  o 
remitírmelo  de  nuevo. 

Me  gustaría  me  permitierais  que  haga 
algún  comentario  respecto  a  los  articulas  y 
notas  a  los  programas  que  han  aparecido 
en  "CLUB  COMMODORE  y  en  COM¬ 
MODORE  WORLD", 

Creo  que  en  algunos  de  éstos  se  dan  lar¬ 
gas  explicaciones,  algo  muy  interesante, 
pero  esto  ocurre  casi  siempre  con  las  líneos 
de  programa  en  "Basic"  o  programas  escri¬ 
tos  en  este  lenguaje.  En  combio  cuando  se 
refiere  a  algún  programa  en  código  máquina 
las  referencias  son  mínimos  y  las  explicacio¬ 
nes  son  del  todo  un  jeroglifico  paro  m¡, 
puesto  que  aún  no  he  encontrada  ningún 
manual  que  explique  con  detalle,  como 
podría  serlo  pora  el  "Basic",  cómo  utilizar  el 
código  máquina,  por  qué  y  cuándo.  Seria  de 
desear  por  mi  parte  hubiera  una  sección  en 
lo  nueva  revísta  tal  como  CLAVE  en  lo  que 
se  enseñe  o  se  explique  de  alguna  manera 
cómo  programar  en  código  máquina. 

Y  paro  finalizar  esto,  demasiado  largo, 
carta,  felicitéis  de  mi  parte  a  Don  Alfonso 
Izquierdo  Font  por  su  excelente  y  sencillo 
programo  DIBUVIC "  que,  aunque  un  paco 
corto  de  explicaciones  para  poder  socorle 
el  mayor  provecho,  para  los  que  no  enten¬ 
demos  de  Geometría,  resulta  muy  interesante. 

FELICIDADES  Y  MUCHA  SUERTE  A  TODO 
EL  EQUIPO"  de  COMMODORE  WORLD, 

RAMON  RONCERO  SANCHON 
O  JACINTO  VERDAGUER'  36 
MADRID  19 

¡Gracias! 

Aprovechamos  tu  carta  para  avi¬ 
sar  a  fados  los  “viejos"  suscriptores 
que  andan  un  poca  despistados 
como  tú.  Todo  los  antiguos  suscrip¬ 
tores  posan  automáticamente  a  ser 
suscriptores  de  Commodore  World 
hasta  que  finalice  su  tiempo  de  sus¬ 
cripción.  Si  alguno  nos  ha  enviado 
una  suscripción  duplicada  que  nos  to 
comunique,  por  favor  para  devol¬ 
verla  o  dejarla  en  depósito  para 
renovación,  a  elegir. 

Sobre  lenguaje  máquina  te  digo 
que  lo  mismo  que  a  Francisco  Soez. 
Nos  meteremos  con  ello  la  más 
pronto  posible, 

Alfonso  Izquierdo,  un  suscriptos 
recoge  tu  felicitación  desde  estas 
páginas. 

Pasamos  tu  pregunto  a  SEAMOS 
PREGUNTONES. 


SEAMOS 


Me  gustaría  me  contestaseis  al  siguiente 
problema;  Tengo  un  VIC-2Ü  al  que  amplío  la 
memoria  con  un  cartucho  de  8K  RAM  y  un 
SUPER-EXPANDER  colocados  en  el  *  VIC-2G 
Expander'  de  1NDE5COMP  (de  bosta  cua¬ 
tro  cartuchos),  pera  ocurre  lo  siguiente:  1 . — 
En  el  caso  de  conectar  los  dos  cartuchos  la 
memoria  RAM  libre  final  que  aparece  en 
pantalla  no  es  el  resultado  de  la  sumo  de  las 
8K  RAM  e!  SUPER  EXPANDER  y  el  propia 
equipo  base.  2.— Sí  conectados  los  dos  car¬ 
tuchos  y  cualquiera  de  ellos  se  desconecta 
medrante  el  interruptor  del  Expander  '  o  lo 
quito  de  este  (siempre  con  Ja  alimentación 
desconectada)  el  resultado  uno  vez  vuelta  a 
conectar  lo  alimentación,  es  que  uno  vez 
aparecido  en  lo  pantalla  la  ‘presentación 
automáticamente  desaparece  como  si  se 
hubiese  tecleado  RUN/STOP  y  RESTORE  y 
cada  vez  que  se  escribe  alga,  ocurre  lo 
mismo.  3. — Sucede  que  en  programas  largos 
en  los  que  se  utilizo  el  modo  GRAPHIC  2 
aparece  OUT  of  MEMORY  pera  consul¬ 
tando  FRÉ(x)  todavía  queda  memoria  y  si  se 
elimina  lo  instrucción  GRAPHIC  2H  el  pro¬ 
grama  se  ejecuta  hasta  ei  final,  pero  cloro, 
sin  alta  resolución. 

¿QUE  HACER? 

RAMON  RONCEROS  SANCHON 
O  JACINTO  VERDACUER  36 
MAORID-l  9 

Cuando  se  utilizan  SKRAM  (o 
más)  con  el  Super-Expcmder,  los  3K 
RAM  de  este  último  están  disponi¬ 
bles  pero  no  para  BASIC,  sólo  para 
lenguaje  máquina. 

2®  Comprueba  que  estén  bien 
introducidos  los  cartuchos  en  sus 
conectores. 

El  fallo  que  dices  puede  ocurrir  si 
el  expansor  no  dispone  de  resisten¬ 
cia  de  “Pull-up"  asociadas  a  los  inte¬ 
rruptores  (¿Fallo  de  diseño...?),  pero 
no  puedo  asegurarla  ya  que  Indes- 
comp  no  nos  ha  enviado  ninguna 
muestra  de  sus  productos. 

3®  El  error  ilOUT  of  Memory" 
puede  ser  debido  a  la  existencia  de 
algún  "GOSUB”  sin  “RETURN".  Aun¬ 
que  disponga  de  memoria  suficiente 
el  stack  puede  llenarse  dando  lugar 
a  este  error. 

Prueba  este  programa: 

10  GOSUB  10 
y  consulta:  FRE(X) 


PREGUNTONES 


ATENCION  DISTRIBUIDORES 

Los  siguientes  lectores  nos  piden  información  sobre  soft  y  productos 
Commodore, 


Software  -  Educación  y  Negocios, 
José  Antonio  Herrera  Arrartz,  Bris- 
tol  Mayer,  Isla  de  Java,  1,  Teléfo¬ 
nos:  729  48  88  ¡Despacho)  -  705  52  49 

Me  gustaría  que  me  enviarais  o 
publicarais  en  vuestra/nuestra  revista 
información  sobre  todos  los  Video¬ 
juegos  disponibles  para  el  VIG20, 
sean  en  cartucho  o  cassette. 

Ramón  Plans  Esperabe.  C/  Corts 
Catalanes,  n-  ó,  3— 4.a*  Caldes  de 
Montbui  íBarna). 

Asi  mismo,  dado  que  en  Pamplona 
los  distriburdors  no  tienen  una  gran 
información  de  bibliografía  Commo- 
dore,  periféricas  y  Software,  y  dado 
que  formamos  un  club  de  programa¬ 
ción  me  gustaría  nos  enviasen  amplía 
información  en  estos  campos. 

Las  actividades  que  realizamos  requie¬ 
ren  esto  información  ya  que  dentro  de 
los  chicos  que  participan  los  hay  ya 
adelantados  en  programación. 

Club  Alaiz,  Plaza  Monasterio  Santa 
Gemma,  s/n.  Teléfonos:  25  44  80  - 
25  77  04,  Pamplona* 

Más  información  de  otras  publica¬ 
ciones  y  programas  establecidos. 

Tengo  un  Gó4 

Juan  López  Ferrer,  Plaza  de 
Careaga,  9,  3®  C  Teléfono:  (951) 
23  26  09.  Almería. 

Agradecería  información  sobre  la 
existencia  de  cartuchos  en  el  mercado 
para  el  C-64. 

Jesús  J,  Inserte  Peralta,  C/  Colum- 
bano,  4,  VaJencia-20, 


Me  interesaría  si  ello  fuera  posible  e! 
que  me  remitierais  un  cató  logo/ fisto  de 
precios  de  los  posibles’  accesorios  o 
complementos  que  se  pueden  disponer 
pora  un  VIG20.  También  bibliografía 
en  España  traducida. 

José  Luís  Lozano.  Rambla  Justo 
Oliveras,  81,  4e,  1*a.  Hospitalet  de 
Llohregat,  Barcelona. 

Les  rogamos  que  si  tienen  algún  libro 
sobre  programas,  nos  lo  comuniquen, 
tipo  de  programas,  precio  y  demás. 

Ismael  Iglesias  Filgueira.  Dirección 
de  envío:  Calle  Arco,  9  y  1 1  -  2®  E,  La 
Coruña-3. 

Os  rogaría  me  enviarais  una  lista  de 
publicaciones  (libros,  revistas,  etc.,.)  en 
castellano,  sobre  eí  COMMODORE  64. 

Román  Elizalde.  Eidistrabe,  46. 
3000  Hannover-1 

Nos  da  casi  vergüenza  tener 
que  admitir  que  estamos  casi  en 
las  mismas  condiciones  que  voso¬ 
tros,  Desde  aquí  hacemos  una 
llamada  a  todos  los  distribuidores 
para  que  nos  envíen  listas  de  soft 
y  productos  disponibles  con  pre¬ 
cios. 

Desde  ya,  podéis  poneros  en 
contacto  con  tas  firmas  que  se 
anuncian  en  la  revista.  Ellas  os 
ayudarán  sin  reservas. 

Al  publicar  vuestra  dirección 
los  distribuidores  pueden  envia¬ 
ros  también  información  direc¬ 
tamente  y,  por  favor  remitídnosla 
en  bien  de  todos. 


DISTRIBUIDORES 

Si  queréis  vender  vuestros  productos  no  hagáis  un  misterio  de  e/fos 
"Ei  buen  paño  en  arca  se  vende”,  pertenece  a  ía  prehistoria. 
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La  MAGIA  son  trucos,  la  MAGIA 
es  divertida. 
La  MA  GIA  es  hacer  ¡o  que  nadie 
se  ha  atrevido. 


i  Magia 

La  MAGIA  es  una  columna  mensual  llena  de 
consejos,  trucos,  de  esto  y  aquello  del  mundo  del 
software, hardware  y  aplicaciones. 
Cada  mes,  MA  GIA  les  trae  trucos  breves  y 
útiles  de  informática  procedentes  de  todo  el 
mundo  -  trucos  descubiertos  por  los  demás  que 
hacen  que  la  informática  sea  más  fácil,  más 
divertida  o  más  animada. 
MA  GIA  habla  de  ideas  sencillas,  programas 
de  una  sola  línea,  sub rutinas  útiles,  hechos  de 
informática  poco  conocidos  y  otras  cosas  de 
interés.  Buscamos  material  nuevo  o  renovado 
que  resulta  ser  de  valor  actual  para  usuarios  de 
equipos  Commodore  y  que  puede  utilizarse  con 
un  mínimo  de  tiempo,  esfuerzo  o  conocimientos 

teóricos. 

MAGIA  resulta  ser  la  fuente  más  completa  de 
información  para  la  informática  práctica, 
además  de  ser  un  foro  internacional  para 
compartir  trucos  con  otros  aficionados.  Envía 

tus  trucos  a: 

COMMODORE  WORLD 
Pedro  Muguruza,  4 
Madrid- 16 

La  revista  “ Commodore  World' ’  sorteará  seis 

paquetes  de  software 
en  julio  y  diciembre  entre  todas  las 
contribuciones  publicadas. 


DETECTAR  PULSACIONES 

Cuando  se  utiliza  una  semencia  GET  para  detectar  una 
pulsación  de  teda,  el  hecho  de  que  se  hayan  salvado  las 
pulsaciones  anteriores  en  el  “keyboard  buffer"  (memoria 
lampón  del  teclado)  podría  constituir  un  problema.  A 
menudo,  cuando  se  termina  el  juego,  el 
jugador  liene  que  volver  a  iniciar  el  juego 
mediante  la  pulsación  de  una  teda,  A  con¬ 
tinuación,  presentamos  la  forma  habitual 
de  hacerlo: 

510  PRINT  "PULSA  TECLA  PARA 
CORRER” 

520  GETA$:IFA$=V"THEN520 
530  RUN 

Estas  lineas  volverán  a  ejecutar  el  programa 
incluso  si  una  léela  fue  pulsada  antes  de  que 
se  ejecutara  la  línea  5 JO.  EJ  problema  se 
solucionará  si  se  añade  la  línea  500  FORI-* 
=  ITO10:GETA$:NEXT. 

Se  puede  hacer  lo  mismo  con  una  sola  linea  sí  las  líneas 
500-530  se  sustituyen  por  3a  siguiente: 

500  PRINT  "PULSA  CUALQUIER  TECLA  PARA 
CORRER”:  POKE  198,Í);WAIT1 98,  I:RUN. 

El  comando  “POKE  198,0"  borra  el  “keyboard  buffer”. 
"WAITI98,!"  le  indica  al  ordenador  que  espere  hasta  que 
se  pulse  una  tecla, 

Westmorelana  Com mador e  Newsletter 


COMILLAS 

Cuando  se  utiliza  la  sentencia  Print  con  la  información 
entre  comillas,  muchas  veces  es  aceptable  omitir  el  segundo 
par  de  comillas.  Por  ejemplo,  el  ordenador  tratrará  las 
siguientes  dos  sentencias  de  la  misma  forma: 

100  PRINT  "MAGIC  1S  FUND” 

1 10  PRINT  "MAGIC  IS  FUND" 

Si  se  di  mi  na  el  segundo  par  de  comillas,  se  ahorra  un 
byte  de  memoria,  una  pulsación  y  un  espacio  en  la  línea  de 
pantalla,  lo  cual  puede  ser  importante  a  veces.  Pero  hay  que 
tener  cuidado  la  última  letra  de  la  información  contenida 
entre  comillas  debe  ser  lo  ultimo  de  la  línea  del  programa. 
Dada  la  presencia  del  comando  GOTO  en  esta  sentencia,  d 
segundo  comando,  120  PRINT  “ABRACADABRA": 
GOTO  120,  no  puede  ser  eliminado. 

Dada  la  presencia  del  punto  y  coma  después  de  esta  sen¬ 
tencia  Print,  hace  falta  el  comando  de  cierre.  130  PRINT 
“LEGERDEMAIN", 

LES. 


PUNTO  Y  COMA 

Muchas  veces  se  pueden  eliminar  los  puntos  y  comas 
entre  varias  unidades  de  información  que  van  a  ser  impri¬ 
midas  en  la  misma  linea.  Si  no  existe 
ninguna  duda  sobre  la  posición  ílnal  de 
una  unidad  de  información  y  la  posición 
inicial  de  la  siguiente.  Jos  puntos  y 
comas  son  innecesarios.  En  este  ejemplo: 

140  PRINT  A$;B$;C$;D;"E" 
una  unidad  de  información  se  distingue 
perfectamente  de  otra  mediante  el  uso  de 
los  signos  de  dólar  y  las  comillas. 

Esta  línea  puede  ser  abreviada  de  la 
siguiente  forma: 

140  PRINT  A$B$C$D"E" 

El  pumo  y  coma  debe  ser  incluido  en 
esta  línea: 

150  PRINT  F,G 

Si  se  sudara,  el  ordenador  imprimiría  innecesariamente 
el  valor  de  la  variable  FG. 

Jacinto  Arroyo  (Badajoz) 

COMAS 

Si  se  coloca  una  coma  entre  dos  unidades  de  información 
en  una  sentencia  Print,  la  segunda  unidad  se  imprime  en  la 
siguiente  posición  de  TAB  previamente  establecida  en  la 


c 


pantalla.  En  el  Commodort-64,  existen  cuatro  posiciones 
de  TAB  por  cada  línea  de  pantalla,  mientras  que  en  el 
VIC-20,  sólo  hay  dos.  Las  comas  adicionales  colocadas 
entre  las  unidades  de  información  hacen  que  las  posiciones 
adicionales  de  TAB  se  salten.  La  A  y  la  B  se  imprimen  en 
las  posiciones  TAB  l  y  4  de  la  siguiente  forma: 

100  PRINT  A,.B 

Pedro  D' A  silva  (Lisboa) 


FORMAC  ION  DEL  MARCO  EN  PANTALLA 

Esta  rutina  imprime  un  marco  alrededor  de  la  pantalla 
del  Commodore  PET,  pero  también  funciona  para  el  C-64, 
Si  se  cambian  unos  cuantos  números,  también  funcionará 
para  d  VIC-20. 

3000  REM  “RUTINA  DEL  MARCO** 

3010  PRINT  "(dear)"::FOR  I=IT039: 

PRINT  F$;:NEXT: PRINT  “(cur¬ 
sor  up)" 

3020  EOR  I=lTO 23: PRINT  F$TAB 
(38)F$:NEXTI 

3030  FOR  I=1T039:  PRINT  FíB;:NEX- 
TTPR1NT  "home” 

En  esta  rutina,  F$  puede  repre¬ 
sentar  cualquier  carácter.  El  usuario 
puede  sustituir  F$  por  su  carácter  prefe¬ 
rido  (entre  comillas,  por  supuesto)  o 
cambiar  F$  cada  vez  que  se  dibuja  el  marco.  Por  ejemplo: 
40  F$="  X”  ;GOS  1. 1 B  3000. 

Pero  es  importante  recordar  que  si  esta  rutina  se  utiliza 
como  subrutina,  hay  que  añadir  una  línea  3040  Return,  y 
hace  falta  una  sentencia  End  en  algún  sitio  antes  de  la 
rutina  para  que  el  programa  no  entre  en  la  rutina  mientras 
éste  se  está  ejecutando. 

Mercedes  Anión  (Madrid) 


CONTROL  PROGRAMABLE  DEL  CURSOR 

El  cursor  puede  ser  colocado  en  cualquier  posición  de 
pantalla  mediante  el  uso  de  una  rutina  como  la  que  se 
presenta  a  continuación: 

10  X$=“{39  crsr  rights)":Y$=“(24  crsr  downs) 

100  X=20:Y=10:GOSUB  3000 

1  lü  PRINT"SORCERY" 

2999  END 

30ÜÜ  REM**POSICIONAR  CURSOR** 

3010  PRINT"(home}"LEFT$(X$,X)LEFT$(  Y$,Y);: 
RETURN 

Las  variables  XS  e  YS  deben  de  inicial  izarse  al  principio 
del  programa  y  no  volver  a  cambiarse.  El  código  en  la 
Línea  100  establece  la  posición  deseada  del  cursor,  y  a  con¬ 
tinuación  coloca  el  cursor  en  la  columna  X  y  la  linea  Y, 
(X=0  para  la  columna  de  la  extrema  izquierda.  Y— 0  para  la 
línea  superior).  A!  volver  de  la  subrutina,  la  línea  110 
impide  la  información  deseada  en  dicha  posición.  La  línea 
2999  prohíbe  la  ejecución  no  deseada  de  la  subrutina. 
Nuestro  experto  añade:  Otro  modo  de  pos  i  donar  el  cursor 
es,  POKE  781.  línea: POKE  782 ,  columnaiPOKE  783.0 : 
SYS6552Q. 

Begoña  Garrido  (Bilbao) 


ADICIONAL  CONTROL  PROGRAMABLE  DEL  CURSOR 

Una  vez  asimilada  la  técnica  del  truco  anterior,  se  puede 
abreviar  mucho  mediante  la  eliminación  de  la  línea  10  y  la 
modificación  de  la  línea  3010  para  que  quede  de  la  siguiente 
forma: 

3010  PRíNT"(home),>LEFTS  ("(24  crsr  downs)'\Y)TAB 
(X);:RETURN, 

Ignacio  Casan  ova  (Tarragona) 
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CONTAR  EN  HEXADECIMAL 

Si  se  cuenta  en  hexadecimal  resulta 
más  fácil  acostumbrarse  al  sistema  de 
numeración  hexadecimal.  El  “signo  de 
libra"  o  el  "signo  de  números"  indica 
que  lo  que  sigue  es  un  número,  mientras 
que  el  signo  de  dólar  constituye  una  cos¬ 
tumbre  ampliamente  usada  que  indica  la 
notación  hexadecimal,  También  existe 
una  costumbre  para  indicar  la  notación 
binaria,  es  decir  el  signo  de  porcentajes, 
pero  no  se  utiliza  con  mucha  frecuencia. 

Javier  Román  (Zaragoza) 


TRUCOS  DE  UNA  SOLA  LINEA 

Este  truco  de  una  sola  linea  convierte  hexadecimal  en  decimal. 
Convierte  un  número  hexadecimal  de  cuatro  dígitos, 
expresado  como  una  variable  de  serie  H$,  en  su  equivalente 
decimal,  expresado  como  la  variable  numérica  D,  Se  pre¬ 
senta  a  continuación: 

100  D=0:FORi=IT04:D%=ASC(HS):D9M8+(D%  64)*7: 
H$=M  1  D$(H$,2):D=  1 6*D+D%:NEXT 

Para  ver  cómo  funciona  la  rutina,  se  añaden  las  dos 
siguientes  lineas,  y  se  ejecuta  el  programa: 

50  INPUT“HEX";H$ 

150  PRÍNT  D 

Margare i  tuel  (Washington) 


OTRO  TRUCO  DE  UNA  SOLA  LINEA 

Este  truco  convierte  el  número  decimal  Den  su  equiva¬ 
lente  hexadecimal  H$  de  cuatro  dígitos: 

200  //Í^"":D~D/4096:FORI— l  T04:  D%=D :  H$=H$+C  H  R$ 
(48+D%-(D%  >  9  )*7):D“  1 6*{  D-D%):  N  EXT 

Este  programa  de  conversión  se  puede  comprobar  si  se 
añade,  además  de  250  PRINT  HS,  al  programa  en  el  truco 
anterior, 

A.  W !  Grym  (New  York) 


“POKES"  DE  COLORES 

Es  fácil  recordar  los  valores  de  los  "Poke"  para  los  pri¬ 
meros  ocho  colores  del  VIC  64  -  el  valor  del  “Poke"  es  uno 
menos  que  el  número  que  aparece  en  la  tecla  de  color.  BLK 
se  encuentra  en  la  teda  1,  así  que  el  valor  "Poke”  es  el  0; 
W  HT  se  encuentra  en  la  tecla  2,  y  el  valor  del  “Poke"  es  el  1 
etcétera. 

L.FS. 


CARACTERES  PROGRAMADOS 

En  el  artículo  sobre  la  creación  de  caracteres  que  aparece 
en  el  n°  I  de  “Commodore  World",  se  dice  en  la  primera 
columna  de  la  página  10  que  se  pierde  la  capacidad  de 
utilizar  el  juego  de  caracteres  p  re- programa  do  del  VIC  al 
crear  caracteres  nuevos  en  un  programa  y  modificar  los 
punteros  para  que  apunten  a  la  RAM  (o  así  me  lo  parece,  a¡ 
menos),  pues  bien,  la  experiencia  que  yo  tengo  al  respecto 
es  la  de  estar  un  día  probando  un  programa  de  juegos  y 
empezar  a  hacer  POKEs  en  La  posición  36869  desde  255,  que 
es  el  nc  necesario  para  que  el  VIC  leyera  los  caracteres 
programados  del  juego,  hacia  abajo;  al  llegar  a  240,  vi  que 
los  caracteres  que  tenía  en  pantalla  pasaban  de  los  progra¬ 
mados  a  los  normales  del  VIC,  lo  que  comprobé  después 
incluyendo  este  comando  POKE  36869,240  en  el  programa  y 
haciendo  que  un  PRINT  pusiera  en  pantalla  letras  cuyo 
código  había  modificado  con  anterioridad,  lo  que  supongo 
que  significará  quede  nuevo  estaba  leyendo  en  ROM. 

Francisco  Sáez  Soto 


REPETICION  DE  TECLA 

“En  el  COMMODORE  64,  sólo  las  teclas  de  movimiento 
de  cursor,  la  de  INST/DEL  y  la  barra  espadadora  presen¬ 
tan  autorrepetición  cuando  se  las  mantiene  pulsadas.  Si  se 
activa  el  bit  7  del  registro  650,  todo  el  teclado  presentará 
esta  característica.  Para  ello,  basta  teclear:  POKE  650,128". 

Rafael  García  Segura  (Málaga) 


HELICOPTERO 

La  que  doy  a  continuación  es  una  subrutina  que  tiene  por 
misión  simular  el  sonido  de  un  helicóptero.  Utiliza  el 
comando  SOUND,  es  decir,  que  sólo  se  puede  ejecutar  en 
presencia  del  SUPEREXPANDER.  La  variable  JJ  no  tiene 
ningún  efecto  sobre  el  sonido,  sólo  determina  el  tiempo  que 
está  ejecutándose  la  subrutina. 

10  FOR  JJ=1  TO  20 

20  FOR  J  =  60  TO  65 

30  SOUND  128+J,0,0,0, 15-INT  (J/5) 

40  SOUND  0,255-JAQ,  l+INT  (J/5) 

50  SOUND  0,0, 128+J,0,l5-[NT(J/5) 

60  SOUND  255-1,0,0,0, l+INT  (J/5) 

70  NEXT  J 
80  NEXT  JJ 
90  SOUND  0,0, 0,0,0 

Francisco  Sáez  Soto 


FUNCIONES  ESPECIALES  DEL  TECLADO 

Introduciendo  directamente  o  en  programa  — POKE 
650,255“  se  consigue  que  todo  el  teclado  se  vuelva  repeti¬ 
tivo,  — POKE  650,0 —  lo  retorna  a  la  normalidad. 

Pulsando  la  tecla  Control  y  al  mismo  tiempo  S,  pone  el 
cursor  al  principio  de  la  pantalla.  Pulsando  Control  T: 
Deletc.  Control  Q:  Cursor  abajo.  Control  :  Cursor  dere¬ 
cha.  Control  =:  Pone  el  cursor  del  l.  fondo.  Control  E;  Lo 
retorna  a  su  color.  Control  N:  Activa  minúsculas.  Control 
H:  Fija  Mayúsculas  o  minúsculas.  Control  I:  Suelta  mayús¬ 
culas  o  minúsculas.  Control  M:  Return. 

Esto  se  puede  utilizar  directamente  o  en  programa.  Aun¬ 
que  son  repetición  de  las  funciones  que  conocemos,  algunas 
veces  pueden  ser  útiles.  Pulsando  Prim“N  control  N  sale  N 
en  inverso.  Al  ejecutar  “Run"  tendremos  las  minúsculas,  es 
más  cómodo  que  POKE  o  que  CHR$  y  más  rápido. 

Domingo  Márquez 


COMO  SIMULAR  LA  INSTRUCCION  “PRINT  AT" 

Muchos  usuarios  del  VIC-20  y  del  COMMODORE  64 
echan  de  menos  la  instrucción 

PRINT  AT  (coordenada  vertical),  (coordenada  horizontal) 
que  otras  versiones  de  BASIC  sí  poseen.  Esta  instrucción 
permite  posicionar  el  cursor  en  cualquier  punto  de  la  panta¬ 
lla,  tras  la  mera  indicación  de  la  fila  y  la  columna  en  que 
deseamos  situarlo.  Una  pequeña  subrutina  de  una  sola 
línea  logra  incorporar  esta  facilidad  a  cualquiera  de  los  dos 
equipos  arriba  mencionados:  basta  con  introducir  el 
número  de  fila  en  la  variable  FILA,  introducir  el  número  de 
columna  en  la  variable  COL,  y  acudir  a  la  subruiina  que  a 
continuación  trascribo: 

KH)00  POKE  78I,FILA:POKE782,COLUMNA: 

POKE  7S3,0:SYS  6520:RETURN 
Una  vez  incluida  esta  subrutina  en  nuestro  programa, 
para  colocar  el  cursor  — por  ejemplo — .  en  la  columna  16 
de  la  fila  9,  escribiremos  simplemente: 

FILA=9:  COL=ló:  GOSUB  10000 
Mágico,  ¿verdad? 

Angel-Francisco  Alegre  Amor.  C /  Dr.  Marañan .  2,  6Ct 
C ACERES.  Tfno.:  (92?)  24  98  85 
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RINCON 
DEL  700 


Software  para  el 


El  aspecto  más  impórtame  de!  700  en 
lo  que  a  software  se  refiere  es  MEC/ 
DOS,  sistema  operativo  desarrollado 
por  el  Departamento  de  Software  de 
Microelectrónica  y  Control,  S.  A.  que 
incorpora  52  comandos  más  al  Basic  de 
Commodore  para  tratamiento  de  Fiche¬ 
ros  ( Relativos,  Tablas  y  de  Claves  — Inde- 
xados— ),  gestión  de  Pantallas,  Múltiple 
Precisión,  Empaquetado  y  Desempaque¬ 
tado  de  Campos,  etc,,.  En  la  VENTANA 
CBM  de  este  número  se  describe, en  lineas 
generales  lo  que  es  MECVDOS  y  lo  que 
representa  para  el  700.  Por  ahora, 
seguiremos  aquí  hablando  de  software 
para  el  700,  aunque  suponiendo  siempre 
que  este  soft  se  confecciona  con  MFC/DOS. 

La  potencia  que  puede  tener  el  700  con 
MBC/DOS  y  un  disco  Winchester  es 
sumamente  considerable.  Con  diskettes, 
esta  potencia  está  condicionada  al  modo 
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de  emplearlos  (tipos  y  frecuencia  de  acce¬ 
sos),  y  a  la  capacidad  de  los  mismos.  No 
obstante,  la  disponibilidad  de  los  ficheros 
de  tipo  Tabla  (MEC/DGS)  permite  paliar 
esta  posible  desventaja  que  puedan  oca¬ 
sionar  los  diskettes  en  algunas  ocasiones, 
operando  en  RAM  los  pequeños  ficheros 
que  pueden  entorpecer  el  acceso  a  los 
grandes. 

El  secreto  de  una  buena  programación 
está  en  trabajar  con  el  número  de  ficheros 
más  apropiado  en  cada  caso,  y  en  el 
correcto  diseño  de  los  mismos.  En  los 
ficheros  no  pueden  haber  campos  inútiles 
que  entorpezcan  el  uso  de  los  que  real¬ 
mente  sí  son  necesarios.  En  los  ordenado¬ 
res,  y  más  concretamente  en  los  micros,  el 
análisis  debe  esforzarse  al  máximo  en  su 
cometido  para  evitar  que  la  máquina  se 
convierta  en  un  “muerto”  que  cause  más 
problemas  que  ventajas  a  sus  usuarios. 

Todos  sabemos  lo  importante  que  es  el 
análisis  en  el  desarrollo  de  las  aplicaciones. 
El  análisis  es  el  punto  intermedio  resultante 
de  lo  que  el  usuario  quiere  que  haga  su 
ordenador  (a  veces  verdaderos  sueños 
imposibles)  y  lo  que  realmente  puede 
hacerse  en  él.  El  analista  es  el  intérprete 
entre  el  lenguaje  profano  en  informática 
del  usuario  y  la  jerga  propia  de  los 
programadores, 

Pero  más  importante  aún  que  el  análisis 
es  la  filosofía  general  de  trabajo  de  un 
analista,  programador,  o  casa  de  soft¬ 
ware.  En  efecto,  en  lugar  de  estudiar  cada 
aplicación  por  separado,  es  necesario 
tener  unas  normas  u  objetivos  generales 
para  que  todos  los  paquetes  tengan  una 
estructura  similar;  ello  repercute  en  clari¬ 
dad  de  análisis,  rapidez  de  programación, 
y  otras  enormes  ventajas  que  más  adelante 
veremos. 

En  este  articulo  voy  a  comentar  a  nivel 
de  análisis  un  paquete  de  gran  divulga¬ 
ción,  El  tema  es  ya  muy  conocido,  pero 
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seguro  que  destaco  algún  aspecto  intere¬ 
sante  útil  a  alguien,  o  sugiero  alguna  idea 
nueva  a  algún  analista. 

El  programa  que  casi  todo  usuario  de 
ordenador  tiene  instalado  es  el  de  Conta¬ 
bilidad.  Es  el  paquete  más  estandarizado 
que  pueda  haber  (junto  con  el  procesador 
de  textos),  pero  también  es  cierto  que  es  el 
que  más  variantes  tiene.  Básicamente,  un 
programa  contable  debería  hacer  las 
siguientes  tareas: 

—  Mantenimiento  de  Ficheros  (Altas, 
Bajas  y  Modificaciones). 

—  Entrada  de  Apuntes  y  Corrección  de 
los  mismos. 

—  Listado  Mayor. 

—  Listado  Diario. 

—  Balances  (Sumas  y  Saldos,  Situación 
y  Explotación), 

—  Cierre  de  Ejercicio. 

Estos  son  los  puntos  básicos.  Si  un  pro¬ 
grama  de  Contabilidad  no  realiza  alguno 
de  ellos,  es  que  ya  ni  siquiera  es  operativo, 

A  partir  de  aqui,  los  “softwarcros” 
pueden  añadirle  todos  los  adornos  que 
quieran  para  dar  más  importancia  al 
paquete: 

—  Cartera  de  Efectos  a  Cobrar. 

—  Cartera  de  Efectos  a  Pagar. 

—  Control  presupuestario  (mensual  o 
total). 

—  Estadística  de  Ratios. 

—  Listados  alfabéticos  de  cualquier 
fichero. 

—  Confección  de  Balances  atrasados 
(por  mes). 

—  Programación  manual  de  los  Balan¬ 
ces  de  Situación  y  Explotación, 
pudiendo  operar  con  varios  formatos, 

—  Diversos  controles  de  cuadre. 

—  Captación  de  apuntes  generados  por 
otros  programas. 

—  ...y  un  largo  etcétera. 

El  problema  se  presenta  cuando  una 
empresa  necesita  un  listado  que  su  pro- 
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grama  no  es  capaz  de  hacer,  y  cuando  una 
empresa  tiene  que  soportar  todas  las  fun¬ 
ciones  extras  que  su  programa  hace,  pero 
que  en  realidad  no  le  hacen  falta.  En  el 
primer  caso  el  ordenador  está  infrautili- 
zado  (mal  programado)  o  es  demasiado 
pequeño:  mientras  que  en  el  segundo  está 
mal  instalado:  si  se  suprimieran  del  pro¬ 
grama  lodos  los  procesos  que  el  usuario 
no  utiliza,  seguro  que  los  tiempos  de  eje¬ 
cución  bajarían  bastante  y  la  capacidad  de 
almacenamiento  para  apuntes  y  cuentas  se 
incrementaría  considerablemente. 

Este  problema  tiene  varias  soluciones, 
algunas  más  factibles  que  otras.  Las  casas 
de  software  podrían  tener  una  amplia 
gama  de  programas  de  Contabilidad,  cada 
uno  enfocado  a  un  tipo  de  empresa  dife¬ 
rente.  Ello  exigiría  un  notable  esfuerzo  de 
la  misma  en  el  mantenimiento  de  tales 
programas.  Pueden  tener  un  programa- 
base  al  que  implementarian  todas  las 
opciones  que  el  usuario  deseara,  como  sí 
hicieran  los  programas  de  Contabilidad 
“"a  medida".  El  inconveniente  es  el  mismo 
que  tienen  todas  las  aplicaciones  "a 
medida":  el  tiempo  de  análisis,  de  pro¬ 
gramación,  de  pruebas,  de  depuración, 
etcétera,  implica  un  alto  coste  del  pro¬ 
grama.  Además  que  se  encontrarían  con 
que  cada  cliente  tiene  un  programa  dife¬ 
rente,  a  saber  cuál  es  el  mejor  Una  solu¬ 
ción  mas  factible  es  tener  el  programa 
repartido  en  módulos  interactivos,  que  el 
i  usuario  elegiría  a  su  gusto.  Este  es  el  sis¬ 
tema  más  deseable,  pero  el  más  difícil  de 
conseguir.  Podría  estar  compuesto  de: 

—  Programa  base  (puntos  mencionados 
al  principio), 

—  Módulo  de  Cartera  de  Efectos. 

—  Módulo  de  Presupuestos. 

—  Módulo  de  Ratios. 

—  Módulo  de  Estadística  Mensual. 

—  ...etc. 

Existe  también  un  caso,  sobre  todo  en 
las  personas  que  trabajan  como  profesio¬ 
nales  liberales,  en  que  ya  el  módulo  base 
I  de  contabilidad  le  viene  grande.  Fiscal¬ 
mente  no  están  obligados  a  llevar  una 
contabilidad  oficial,  por  lo  que  a  ellos  les 
bastaría  controlar  sus  ingresos  y  gastos 
particulares.  Tendrían  suficiente  con  un 
programa  que,  además  del  mantenimiento 
de  ficheros  y  entrada  de  apuntes,  les  con¬ 
feccionara  un  detalle  de  ingresos  y  gastos. 


el  listado  de  cuenta  corriente  del  banco,  y 
un  balance  que  les  informara  de  los  bene¬ 
ficios.  El  escaso  número  de  cuentas  con¬ 
tables  (básicamente  cuentas  de  ingresos, 
gastos,  caja  y  bancos)  y  de  apuntes  le 
redundada  en  una  mayor  velocidad  de 
ejecución  y  en  la  posibilidad  de  completar 
sus  listados  con  diagramas  de  barras, 
estadística  mensual,  etc... 

Actualmente,  en  nuestro  país,  por  muy 
baratos  que  sean  los  microordenadores, 
no  llegan  a  justificar  su  precio  si  se 
adquieren  para  llevar  únicamente  esta 
mim-contabilidad,  Hay  ordenadores  per¬ 
sonales,  incluso  familiares,  capaces  de  ges¬ 
tionarla,  introduciendo  los  apuntes  des¬ 
pués  dei  combate  intergaláctico  y  ames  de 
fa  partida  de  comecocos.  Pero  un  profe¬ 
sional  de  este  tipo  tiene  otros  trabajos  que 
también  son  mecanizabas:  ei  abogado 
necesita  un  procesador  de  textos,  el  arqui¬ 
tecto  un  cálculo  de  estructuras,  el  cons¬ 
tructor  un  seguimiento  de  obras,  el  que 
esté  sujeto  a  la  Estimación  Objetiva  Singu¬ 
lar  una  relación  de  facturas  emitidas,  etc... 
A  veces  un  ordenador  es  más  útil  cuando 
realiza  las  pequeñas  tareas  de  cada  uno, 
que  mecanizando  todo  un  complejo  y 
voluminoso  proceso. 

Normalmente,  el  ordenador  se  compra 
para  que  realice  el  mayor  número  de 
tareas  posible,  con  el  mínimo  presupuesto 
de  maquinaria;  es  decir,  mucho  soft  con 
poco  hard.  Si  a  eso  le  añadimos  que,  por 
definición  popular  infundada,  el  soft  tiene 
que  ser  más  barato  que  el  hard,  los  distri¬ 
buidores  de  ordenadores  se  las  ven  negras 
para  confeccionar  un  soft  barato  que  a  la 
vez  sea  potente,  cosas  casi  siempre  incom¬ 
patibles.  Han  recurrido  a  los  estándares 
anunciando  grandes  programas  de  conta¬ 
bilidad,  grandes  programas  de  facturación 
y  grandes  programas  de  hóminas  a  un 
redo  realmente  barato.  Han  preferido 
acer  un  gran  paquete  que  lo  pueda 
"hacer  todo",  antes  que  confeccionar 
cada  una  de  las  aplicaciones  a  medida. 
Ello  repercute  en  los  que  realmente  no 
necesitan  tantos  procesos  y  listados  para 
mecanizar  su  empresa. 

Hemos  llegado  al  problema  inicial  plan* 
leado  en  este  artículo:  el  programa  están- 
dard  que  no  se  adapta  al  usuario.  Hasta 
que  no  arraigue  entre  el  gran  conjunto  de 
consumidores  de  informática  la  idea  de 


que  la  programación  puede  resultar  más 
cara  que  el  propio  ordenador,  el  problema 
seguirá  existiendo.  Cuando  ello  ocurra, 
estos  grandes  paquetes  podrán  dividirse 
en  otros  más  pequeños  que  se  podrán 
modula  rizar  entre  sí.  Por  ejemplo,  la  ges¬ 
tión  comercial  de  una  empresa  estará 
compuesta  por: 

—  Módulo  de  Contabilidad  (a  su  vez 
también  modularizado), 

—  Módulo  de  Control  de  Almacén. 

—  Módulo  de  Control  de  Clientes, 

—  Módulo  de  Control  de  Proveedores. 

—  Módulo  de  Facturación  (facturas, 
recibos  y  remesas). 

—  Y  todos  los  módulos  que  bagan  falta. 

De  esta  manera,  pueden  haber  muchos 

módulos  sobre  un  mismo  tema,  por  ejem¬ 
plo  el  Control  de  Clientes:  algunos  contro¬ 
larán  las  compras  totales  que  hace  cada 
cliente,  otros  lo  controlarán  mensual¬ 
mente,  habrán  diferentes  modalidades  de 
pago  p  re-programa  das,  algunos  módulos 
incorporarán  el  cálculo  de  rappcls,  otros 
tendrán  estadística  de  compras  por  uni¬ 
dad,  litro,  kilo,  etc...  La  elección  apro¬ 
piada  de  cada  uno  de  los  módulos  que 
componen  la  programación  permitirá 
obtener  una  aplicación  casi  a  medida. 
Cuantos  más  módulos  haya  por  elegir, 
más  eficaz  será  la  mecanización  total. 

Por  ahora,  ios  costes  que  implican  con¬ 
feccionar  cada  uno  de  estos  módulos,  que 
han  de  ser  compatibles  con  los  demás, 
aparte  de  poder  funcionar  por  sí  solos,  es 
demasiado  alto  en  el  campo  de  los 
microordenadores.  Estaremos  más  cerca 
de  ello  si  empezamos  a  confeccionar 
pequeños  paquetes,  réplica  de  los  grandes, 
que  puedan  comunicarse  con  algún  otro 
pequeño  paquete.  El  coste  de  la  mecaniza¬ 
ción  total  de  una  oficina,  a  base  de  estos 
pequeños  paquetes,  puede  resultar  más 
caro,  pero  también  más  ventajoso  al  usua¬ 
rio,  que  dispondrá  de  programas  a  medida 
que  no  tienen  etapa  de  depuración,  pues 
están  ya  confeccionados.  En  realidad, 
cada  uno  de  estos  pequeños  paquetes 
puede  ser  un  módulo  de  una  programa¬ 
ción  mayor. 

Todo  lo  dicho  no  afecta  únicamente  a  la 
serie  700  de  Commodore,  ni  a  los  ordena¬ 
dores  Commodore  en  conjunto,  pero  ya 
estamos  en  lo  de  siempre:  quien  pega  pri¬ 
mero  pega  dos  veces.  * 
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Los  capítulos  previos  fueron  publicados  con 
anterioridad  en  COMMODORE  CLUB.  Aque¬ 
llos  lectores  que  los  deseen,  les  rogamos  que  nos  lo 
comuniquen  para  poder  enviarles  copia  de  estos 
capítulos. 


El  RS-232-C  en  les  ordenadores  Commodore 


Las  instrucciones  1NPUT#  y  GETfl 
toman  los  datos  desde  el  buffer  receptor  y 
PRINTtf  y  CMD  colocan  los  datos  en  el 
buffer  emisor. 

Apertura  de  un  canal  RS-232-C 

Sólo  se  puede  abrir  un  canal  de  este  tipo 
a  la  vez.  Una  segunda  instrucción  OPEN 
causa  el  reajuste  de  los  punteros  del  buf¬ 
fer,  Todos  los  caracteres  de  cualquiera  de 
los  dos  buffers  se  perderán. 

Se  pueden  colocar  hasta  4  caracteres  en 
el  campo  del  nombre  del  fichero.  Los  dos 
primeros  son  caracteres  de  control  y  de 
comando.  Los  otros  dos  están  reservados 
para  sistemas  futuros.  La  velocidad  de 
transmisión,  paridad  y  otras  opciones  se 
pueden  seleccionar  usando  esta  caracterís¬ 
tica.  Si  se  utiliza  un  carácter  de  control 
ilegal  o  que  no  está  definido,  el  sistema 
envia  los  datos  a  una  velocidad  menor  de 
50  baudios. 

Sintaxis  en  basic 

La  sintaxis  utilizada  para  la  apertura  de 
un  canal  RS-232-C  es  La  siguiente: 


Las  últimas  generaciones  de  ordena¬ 
dores  COMMODORE,  (VIC  20, 
COMMODORE  64,  CBM  700), 
incorporan  de  alguna  manera  el  hardware 
necesario  para  efectuar  la  comunicación 
con  otros  periféricos  u  ordenadores 
mediante  un  canal  RS-232-C.  El  VIC  20  y 
el  COMMODORE  64  requieren  un  cartu¬ 
cho  de  interface,  el  VIC  1011  A.  que  se 
conecta  en  el  port  del  usuario  de  cual¬ 
quiera  de  ellos.  El  CBM  700  incorpora  de 
origen  un  pon  de  comunicación  serie 
RS-232-C 

El  RS-232-C  del  COMMODORE  64  y 
del  VIC  20  está  dispuesto  en  el  formato 
estándar  de  esta  interface  pero  los  niveles 
no  son  los  adecuados  del  RS-232-C,  El 
interface  de  COMMODORE  (VIC  10  HA) 
efectúa  esta  adaptación. 

El  acceso  y  programación  del  interface 
puede  efectuarse  desde  BASIC  o  mediante 
ciertas  rutinas  del  KERNAL. 

El  software  para  manejar  la  interface 
desde  BASIC  utiliza  las  siguientes  instruc¬ 
ciones:  OPEN,  CLOSE,  CMD,  INPUTtf, 
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Figura  í.  Estructura  deí  Registro  de  Control  ( VIC- 20  y  €-64} 


OPEN  lín,2,sa, 

—  REGISTRO  DE  CONTROL— 

— REGISTRO  DE  COMANDO— 

Logic  filename  — Ifn. —  El  número  de 
fichero  lógico  puede  ser  cualquier  número 
entre  l  y  255,  Si  se  utiliza  un  número 
superior  a  128  se  alimentará  una  linea 
después  de  cada  retomo  de  carro. 

Secondary  address  — sa.—  La  dirección 
secundaria  en  el  VIC  20  y  el  COM MO¬ 
DO  RE  64  es  recomendable  que  sea  siem¬ 
pre  un  cero.  En  el  CBM  700  existen  varias 
opciones: 

sa=G  -  NO  ACTUA 

sa=l  -  SOLO  TRANSMISION 

sa=2  -  SOLO  RECEPCION 

sa=3  -  TRANSMISION/RECEPCION 

sa  mayor  que  128  -  HABILITA  LA 

CONVERSION  CBM/ASCII 

Registro  de  control 

Es  un  carácter  de  un  solo  byte  que  con¬ 
tiene  la  información  de  velocidad  de 
transmisión/recepción,  longitud  de  pala¬ 
bra,  número  de  bits  de  stop.  Vea  la  figura  L 

Registro  de  comando 

Es  un  carácter  de  un  solo  byte  que 
define  otros  parámetros  del  terminal 
como  son;  Opciones  de  paridad,  half/full 
dúplex,  modo  de  Handshakc,  Ver  figura  2. 

En  un  programa  BASIC,  la  apertura  de 
un  canal  RS-232-C  debe  hacerse  antes  de 
definir  cualquier  variable  o  tabla  ya  que 
automáticamente,  al  abrir  un  canal  RS- 
232-C  se  efectúa  un  CLR.  También  se  ha 
de  tener  en  cuenta  que  son  necesarios  512 
bytes  libres  como  mínimo  antes  de  la 
apertura  de  un  canal  RS-232-C. 

Para  que  quede  claro  el  concepto  de 
REGISTRO  DE  CONTROL  y  REGIS¬ 
TRO  DE  COMANDO  pondremos  un 
ejemplo.  Supongamos  que  deseamos  pro¬ 
gramar  la  interface  como  7  bit  de  longitud 
de  palabra,  l  bit  de  stop,  300  bauds  de 
velocidad  de  recepción/transmisión,  pari¬ 
dad  inpar  recepdón/transmisión,  full 
dúplex  y  3  líneas  de  comunicación. 

El  valor  binario  del  registro  de  comando 
es  00100000  y  su  valor  en  decimal  es  32. 

Por  lo  tanto  utilizando  la  sintaxis  en 
BASIC  debemos  poner: 

OPEN  2,2,ü,chr$(38)+chr$(32) 


Recepción  de  datos  desde 
un  canal  RS-232-C 

En  La  recepción  de  datos  de  un  cana! 
RS-232-C,  el  buffer  del  VIC  20  y  del 
CGMMODORE  64  pueden  almacenar 
hasta  255  caracteres  antes  de  llenarse  por 
completo.  En  el  caso  de  que  se  intente 
almacenar  más  caracteres  de  los  indicados 
se  produce  un  OVERFLOW  que  es  indi¬ 
cado  en  el  bit  correspondiente  de  la  pala¬ 
bra  de  estado. 


Si  ocurre  un  desbordamiento  de  la 
capacidad  del  buffer,  todos  los  caracteres 
recibidos  desde  que  el  buffer  estaba  com¬ 
pleto  se  perderán. 

Si  desea  recibir  datos  desde  un  perifé¬ 
rico  RS-232-C  de  gran  velocidad  deberá 
utilizar  un  programa  en  código  máquina, 
ya  que  el  BASIC  es  demasiado  lento  y 
probablemente  perdería  caracteres. 


Sintaxis  en  Basic 

La  sintaxis  recomendada  es: 

GET  Ifn,  “VARI  ABLE  DE  CADENA— 

Si  la  palabra  es  menor  a  8  bits,  lodos  los 
bits  no  utilizados  contendrán  el  valor 
cero. 

Si  un  GET  no  encuentra  datos  en  el 
buffer,  devuelve  una  cadena  vacía. 

Si  se  usa  INPUT,  el  sistema  espera 
hasta  que  encuentra  una  cadena  no  vacía 
seguida  de  un  retorno  de  carro.  Por  esto, 
sí  las  señales  CLEAR  TG  SEND  o  DATA 
SET  READY  desaparecen  durante  la  eje¬ 
cución  del  INPUT,  la  ejecución  del  pro¬ 
grama  se  interrumpe.  Por  esto  no  se 
recomienda  el  uso  de  INPUT, 


Bit  núm,  7  6  5  4  3  2  1  0 

l  bit  stop . ..., . 0 

7  bit  datos . . .  0  I 

No  se  usa . . , . . . .  0 

300  bauds . . .  0  110 

El  valor  binario  del  registro  de  control  es  001001 10  y  su  valor  en  decimal  es  38, 
Bit  núm.  7  6  5  4  3  2  L  0 

Paridad  impar  R/T . * .  0  0  1 

Full  dúplex,,.,,,,,,,, . .  0 

No  se  usa . . . . . 0  0  0 

3  líneas,,,. . . . .  0 
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OPCIONES  DE  PARIDAD- 


BIT 

7 

BIT 

6 

BIT 

5 

OPCIONES 

* 

0 

PARIDAD  INHABILITADA  EN 
EMISION  V  RECEPCION 

0 

0 

1 

PARIDAD  INPAR 
RECEPCION/TRANSMISION 

0 

1 

1 

PARIDAD  PAR 

RECE  PCION/TRANSMISION 

1 

0 

1 

MARCA  TRANSMITIDA  PRUEBA 

DE  PARIDAD  INHABILITADA 

1 

1 

1 

ESPACIO  TRANSMITIDO  PRUEBA 
DE  PARIDAD  INHABILITADA 

DUPLEX 


O-FULL  DUPLEX 
1-HALF  DUPLEX 

NO  SE  USA 
NO  SE  USA 
NO  SE  USA 


*— HANDSHAKE 

0-3  LINEAS 
1-X  LINEAS 


Envío  de  datos  por  el  canal 
RS-232-C 

El  buffer  de  salida  tiene  una  capacidad 
de  255  caracteres. 

Sintaxis  en  Basic 

Se  puede  utilizar: 

CMDlfn 

PRINTIfn,— LISTA  DE  VARIABLES— 
No  existe  un  retorno  de  carro  en  canal 
de  salida.  Esto  significa  que  una  impre¬ 
sora  normal  RS-232-C  puede  no  imprimir 
bien  a  menos  que  se  impiemente  algún 
tipo  de  HQLD-OFF  {se  pida  al  ordena¬ 
dor  que  espere),  o  exista  algún  buffer  en  la 
impresora.  El  HOLD-OFF  se  puede 
improvisar  fácilmente  en  el  programa.  Si 
se  trabaja  en  modo  X-líneas  el  VIC  20  o  el 
CGMMODORE  64  efectúan  el  HOLD- 
OFF  a  partir  de  La  señal  CTS.  En  el 
COMMODORE  64  y  el  VIC  20  se  han 
implementado  las  líneas  RTS,  CTS,  DCD, 
como  terminal  de  datos. 

Cierre  del  canal  RS-232-C 

El  cierre  de!  canal  RS-232-C  descarta 
todos  los  datos  presentes  en  los  buffers  en 
el  momento  de  ¡a  ejecución  { hayan  sido  o 
no  transmitidos  o  impresos),  detiene  todas 
las  transmisiones  y  recepciones  del  R$- 
232-C,  ajusta  la  linea  RTS  y  las  lineas 
altas  (Sout)  de  datos  transmitidos,  y  des¬ 
truye  el  contenido  de  los  dos  buffets  del 
RS-232-C. 

Sintaxis  en  Basic 

CLOSElfn 

Asegúrese  de  que  se  han  transmitido 
todos  los  datos  antes  de  cerrar  el  canal 
serie.  Una  forma  de  verificar  esto  desde 
BASIC  puede  ser: 

10ÜSS=ST: I F(SS=0  OR  SS=g)  THEN  100 
1  lOCLOSElfn 

Variable  ST  o  byte  de  estado. 

(Ver  fig.  3) 

La  variable  reservada  o  variable  de 
estado  ST  de  longitud  1  byte,  contiene 


toda  la  información  necesaria  para  la 
validación  de  cualquier  dato  enviado  o 
leído  por  el  canal  serie.  Si  los  bits  están  a 
cero  no  se  detecta  error.  La  lectura  de  la 
palabra  de  estado  provoca  su  borrado,  y 
por  tanto  en  los  casos  en  que  sean  necesa¬ 
rias  varias  lecturas  de  la  misma,  se  proce¬ 
derá  a  su  asignación  a  otra  variable.  La 
variable  de  estado  puede  ser  leida  sólo 
cuando  el  canal  serie  ha  sido  el  último  en 
utilizarse  en  una  operación  de  E/S. 


Figura  2 , 
Estructura  de  i  Registro 
de  Comando 
(VtC-20  y  C-64), 


Figura  3 . 

Registro  de  Estado 
(ST) 

del  BS-232, 
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Detalles  de  los  conectores  del  canal  RS-232-C 


SEÑAL 

VIC  2G/C  64 

VIC  1011/CBM  700 

SENTIDO 

Gnd 

A,N 

1,7 

RXD 

B,C 

3 

1N 

TXD 

M 

2 

OUT 

RTS 

D  s 

4 

OUT 

DTR 

E 

20 

OUT 

DCD 

H 

8 

m 

DSR 

L 

6 

1N 

CTS 

K 

5 

IN 
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Una  Excursión  en  Basic 

Más  allá  del  Manual 


Capítulo  II 

Por  Jeffrey  Mills 


En  este  capítulo  vamos  a  descu¬ 
brir  cómo  los  valores  se  asig¬ 
nan  a  las  variables  —  esto  es  un 
truco  que  cada  programador  debe 
tener  en  su  repertorio. 


En  la  Primera  Parte  de  esta  serie  de  artícu¬ 
los,  empezamos  a  desarrollar  un  programa 
capaz  de  catalogar  y  listar  los  programas 
según  un  número  de  cima* 

Hablamos  de  los  comandos  preparatorios 
New,  CLR  y  List.  También  hablamos  de  la 
numeración  de  las  REM  y  las  lineas.  Hasta 
ahora,  nuestro  programa  tiene  el  siguiente 
formato: 

10  REM  CATALOGO  PROGRAM  A/CINTA 
20  REM  ESCRITO  POR:  tu  nombre 
30  PRINT  “(Shift-CLR/HOME)” 

40  PRINT  “CATALOGO  CINTA" 

50  PRINT 

60  PRINT  “101”,  “JUEGO  1” 

70  PRINT  “101”,  “JUEGO  2” 

Ahora  volvamos  atrás  para  añadir  las  cabe¬ 
ceras  de  las  columnas  a  nuestra  lista.  Utiliza¬ 
remos  la  sentencia  PRINT  con  comas.  Se 
teclea: 

52  PRINT  “CINTA”,  “PROGRAMA” 

54  PRINT  “NO  ”,  “NOMBRE” 

56  PRINT 

Hay  que  observar  la  forma  en  que  las  lineas 
se  insertan  entre  los  existentes  números  de 
línea.  Esto  constituye  un  buen  ejemplo  del 
motivo  por  e!  cual  las  líneas  se  numeran  de 
diez  en  diez  al  comenzar  un  listado. 

En  vez  de  utilizar  una  distinta  sentencia 
PRINT  para  cada  programa  de  la  lista,  existe 
un  método  más  sencillo.  Sin  embargo,  antes  de 
empezar  a  hablar  de  esto,  hace  falta  saber  un 
par  de’ cosas  más. 

Más  Terminología 

1)  Variable.— Una  variable  es  una  pequeña 
porción  de  La  memoria  del  ordenador,  a  la  cual 
se  le  asigna  un  valor,  u  otro  contenido  que 
podría  cambiar,  o  variar,  en  el  curso  de  un 
programa.  Las  variables  podrían  ser  conside¬ 
radas  como  pequeñas  cajas  o  cajones  de  fiche¬ 
ros  creados  en  la  memoria  mediante  una  sen¬ 
tencia  del  programa. 


Existen  varios  tipos  de  variables.  Para  nues¬ 
tros  fines  actuales,  sólo  hablaremos  de  las 
variables  numéricas  o  de  serie  (letra  o 
carácter). 

A  una  variable  en  un  programa  se  le  puede 
asignar  cualquier  nombre  dentro  de  las 
siguientes  normas: 

•  Debe  de  empezar  con  una  letra  del  alfa¬ 
beto  (A-Z),  pero  se  puede  utilizar  tanto  una 
letra  como  un  número  (0-9)  en  la  segunda 
posición  del  nombre. 

•  Las  dos  primeras  letras  del  nombre 
deben  ser  distintas  de  las  dos  primeras  letras 
de  cualquier  otro  nombre  elegido.  Estas  dos 
letras  son  las  que  utiliza  el  ordenador  para 
distinguir  un  cajón  de  fichero  de  otro.  Por 
ejemplo,  para  el  ordenador,  BOY  y  BOAT  son 
iguales,  ya  que  sólo  se  miran  las  dos  primeras 
letras. 

•  No  se  puede  utilizar  cualquier  nombre 
de  variable  que  empiece  con  las  mismas  dos 
letras  que  una  Palabra  Clave  en  Basic.  (El 
Apéndice  D  del  manual*} 

St  la  variable  sólo  va  a  contener  números,  se 
utiliza  una  variable  numérica.  Si  va  a  contener 
caracteres  (letras  y  símbolos),  se  utiliza  una 
variable  de  serie. 

Las  normas  para  los  nombres  variables  son 
las  mismas  que  para  las  variables  numéricas  y 
La  serie.  Se  le  indica  al  ordenador  que  la  varia¬ 
ble  va  a  contener  letras  y  símbolos  mediante  La 
adición  de  un  signo  de  dólar  ($)  al  final  del 
nombre* 

Normalmente  es  mejor  que  los  nombres 
variables  sean  lo  más  cortos  posible,  dado  que 
cada  carácter  ocupa  espacio  en  la  memoria  del 
ordenador.  Sin  embargo,  si  se  Llama  a  una 
variable  que  almacena  un  nombre  ÑAMES, 
resultará  fácil  repasar  el  programa  en  el  futuro 
para  saber  lo  que  representa  dicha  variable* 
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2)  Semencia  de  asignación, — Ahora 
que  se  sabe  que  el  ordenador  puede 
almacenar  información  en  ios  cajones 
de  ficheros  llamados  variables,  hay 
que  aprender  la  forma  de  introducir 
los  valores  en  dichas  variables.  Esto  se 
hace  mediante  una  sentencia  assign- 
ment  (Asignación). 

Supongamos  que  una  variable  se 
llama  “A"  y  tiene  que  asumir  el  valor 
5.  Es  suficiente  teclear  A=5.  (También 
se  puede  teclear  LET  A =5,  pero  el 
comando  LET  se  utiliza  pocas  veces, 
dado  que  el  Commodore  supone  que 
se  entiende  LET  si  se  teclea  A^algún 
valor  X. 

Si  se  quiere  cambiar  el  valor  de  la 
variable  A  a  otra  cosa,  digamos  12,  al 
teclear  A=  1 2,  se  borrará  el  5,  y  el  1 2  se 
colocará  en  su  lugar  en  el  cajón  de 
fichero  A. 

Leyendo  los  Datos 

3)  Read/Data. — El  uso  de  los  dos 
comandos  Read  y  Data  facilita  la 
asignación  de  valores  a  las  variables. 
Una  explicación  sobre  estas  dos  sen¬ 
tencias  Basic  se  presenta  en  las  pági¬ 
nas  92  a  94  del  manual. 

La  sentencia  Data  no  es  ejecutable. 
No  es  un  verbo.  El  ordenador  no  hace 
nada  cuando  ve  esta  palabra  en  un 
programa. 

Una  sentencia  Data  simplemente 
almacena  los  números  y  palabras  que 
serán  utilizados  por  el  programa.  Se 
listan  en  el  orden  en  que  se  utilizarán, 
y  se  separan  mediante  el  uso  de 
comas.  A  diferencia  de  la  sentencia 
PRINT,  estas  comas  no  afectan  en 
absoluto  la  salida  de  información  en 
la  sentencia  Data.  Su  función  es  la  de 
identificar  la  separación  entre  dos 
unidades  de  datos. 

Cuando  un  programa  se  ejecuta,  el 
ordenador  recoge  toda  la  información 
contenida  en  una  sentencia  Data  y  la 
almacena  en  una  posición  especial. 
De  esta  forma,  la  información  puede 
ser  recuperada  en  el  momento  en  que 
la  pide  el  programa.  El  usuario  le 
indica  al  ordenador  que  recupere 
información  de  una  sentencia  Data, 
mediante  el  comando  Read. 

El  comando  Read  recoge  el  siguiente 
valor  de  la  lista,  lo  coloca  en  la  varia¬ 
ble  especificada,  y  desplaza  un  pun¬ 
tero  a  la  siguiente  unidad  de  informa¬ 
ción  de  la  lista.  El  puntero  le  indica  a 
la  siguiente  sentencia  Read  dónde 
tiene  que  empezar. 

En  general,  una  vez  que  una  unidad 
de  información  haya  sido  leída,  no  se 
vuelve  a  tener  acceso  a  ella.  El 
comando  Read  repasa  la  lista,  leyendo 
toda  la  información,  hasta  el  final  de 
ésta.  (Si  el  usuario  intenta  leer  más 
información  que  la  contenida  en  la 
lista  de  sentencia  Data,  el  programa 
terminará  con  un  mensaje  de  error  de 
Out  of  Data  [Faltan  Datos]). 


A  continuación,  se  presenta  una 
típica  sentencia  Data: 

90  DATA  2,42,56,13 
A  continuación,  se  presenta  una 
típica  sentencia  Read: 

100  READ  A 

Mediante  el  uso  del  comando  Read, 
el  usuario  le  indica  al  ordenador  que 
lea  la  siguiente  unidad  de  información 
de  la  lista  de  sentencias  Data  y  que 
coloque  lo  que  lea  en  la  variable  espe¬ 
cificada  en  la  sentencia  Read, 

Cuando  se  ejecuta  la  línea  mencio¬ 
nada  anteriormente,  A  contendrá  e! 
número  2.  Si  la  siguiente  línea  fuese 
110  READ  B,  la  variable  B  conten¬ 
dría  el  valor  42,  y  A  seguiría  conte¬ 
niendo  el  valor  2. 

Las  sentencias  Data  también  pue¬ 
den  contener  datos  alfabéticos.  Por 
ejemplo: 

90  DATA  CAT,  DOG,  BIRD 
Ahora  la  sentencia  Read  tendrá  que 
especificar  una  variable  de  serie.  Por 
ejemplo: 

100  READ  A$ 

Cuando  se  ejecuta  esta  sentencia,  la 
variable  llamada  A$  (pronunciado  A- 
stríng)  contendrá  la  palabra  “cal".  Si 
la  línea  110  se  cambiara  ahora  a  1 10 
READ  BS,  B$  contendría  la  palabra 
“dog",  y  A$  seguiría  con  su  inquilino 
felino. 

También  se  pueden  mezclar  datos 
numéricos  y  de  serie  (números  y  pala¬ 
bras)  dentro  de  una  sentencia  Data. 
Por  ejemplo: 

90  DATA  1,  GAME  i,  1GAME  2 
Ahora  las  sentencias  Read  serían  de 
la  siguiente  forma: 

100  READ  A 
110  READ  A$ 

120  READ  B 
130  READ  B$ 

Después  de  ejecutarse  estas  senten¬ 
cias,  A  contendrá  el  valor  i,  AS  con¬ 
tendrá  el  “string"  de  caracteres 
GAME  I ,  B  contendrá  el  valor  I  y  B$ 
el  “stríng"  de  caracteres  GAME  2. 

De  la  misma  forma  en  que  se  utili¬ 
zan  las  comas  para  separar  las  unida¬ 
des  de  información  dentro  de  una  sen¬ 
tencia  Data,  se  puede  especificar  que 
se  lea  más  de  una  unidad  de  informa¬ 
ción  en  una  sentencia  Read.  Por 
ejemplo: 

100  READ  A,A$,B,B$ 

Esta  semencia  realiza  lo  mismo  que 
las  cuatro  líneas  anteriores. 

Volviendo  al  Programa... 

Dado  que  ya  sabemos  asignar  valo¬ 
res  a  las  variables,  podemos  imprimir 
el  listado  usando  solamente  una  sen¬ 
tencia  Print  (después  de  las  cabece¬ 
ras).  Sin  embargo,  hay  otro  concepto 
que  debemos  de  tocar  para  poder 
realizar  estas  tareas  de  una  forma  efi¬ 


caz.  Este  consiste  en  el  bucle  GOTO, 
del  cual  hablaremos  con  más  detalle 
en  otro  capítulo. 

De  momento,  es  suficiente  recordar 
que  la  sentencia  GOTO  le  envía  al 
ordenador  a  un  número  de  líneas 
determinado  dentro  del  programa.  Si 
esto  se  hace  al  final  de  una  serie  de 
líneas,  el  ordenador  vuelve  a  realizar 
el  mismo  juego  de  instrucciones  una  y 
otra  vez,  hasta  que  ocurre  algo  que 
produce  un  cambio.  (La  sentencia 
GOTO  se  explica  en  las  páginas  30  y 
123  del  manual). 

Vamos  a  sustituir  las  líneas  60  y  70 
en  nuestro  programa  Catalog  por  una 
sentencia  Read  y  una  sentencia  Print, 
Se  teclean  las  siguienes  lincas: 

60  READ  N,P$ 

70  PRINT  N,P$ 

Ahora  se  supone  que  nos  hace  falta 
una  sentencia  Data  para  acompañar 
La  sentencia  Read.  Para  que  no  resulte 
demasiado  complicado,  las  semencias 
Data  tendrán  asignados  unos  núme¬ 
ros  de  línea  lo  suficientemente  altos 
como  para  permitir  la  inserción  de 
otras  líneas.  Vamos  a  empezar  con  el 
número  de  líneas  9000.  Se  teclea: 

9000  DATA  10 LOAME  LOAME  2 

9010  DATA  102, GAME  3, GAME  4 

9020  DATA  103, GAME  5,GAME  6 

Las  unidades  de  información  con¬ 
tenidas  en  cada  una  de  estas  senten¬ 
cias  son  un  número  de  cinta,  un  nom¬ 
bre  de  juego,  un  número  de  cinta  y  un 
hombre  de  juego.  Si  se  ejecuta  el  pro¬ 
grama  ahora,  sólo  se  imprimirá  el 
primer  número  de  cinta  y  el  primer 
nombre  de  juego.  Aquí  es  donde  entra 
en  juego  el  bucle  GOTO. 

Él  programa  entra  en  un  bucle  si  se 
teclea  80  GOTO  60.  Volverá  a  ejecu¬ 
tar  las  líneas  60  y  70,  pero  cuando 
termina  la  línea  80,  regresará  a  la 
línea  60.  Volverá  a  ejecutar  las  líneas 
60  y  70  otra  vez..,  y  otra...  y  otra... 

Cuando  el  programa  haya  leído 
toda  la  información  contenida  en  la 
lista  de  sentencias  Data,  el  programa 
termina  imprimiendo  lo  siguiente  en 
pantalla: 

?GUT  OF  DATA  ERROR  EN  60 

Existe  una  lista  de  todos  los  mensa¬ 
jes  de  error  del  Commodore  en  la 
página  150  y  i 5 1  del  manual.  Es  nor¬ 
mal  que  no  signifiquen  gran  cosa  para 
el  principiante  en  estos  momentos. 
Seguramente  nos  tropezaremos  con 
muchos  de  ellos  en  nuestra  pantalla  a 
medida  que  vayamos  escribiendo 
programas  en  Basic. 

El  Ejemplo  1  demuestra  la  salida 
del  programa  Catalog  tal  y  como  lo 
hemos  desarrollado  hasta  ahora. 

En  el  siguiente  artículo  hablaré  de 
los  métodos  empleados  para  que  el 
programa  no  termine  en  error,  ade¬ 
más  de  las  formas  de  controlar  la 
formación  de  bucles  en  el  programa 
dentro  del  bucle  GOTO.  ■ 
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Ficheros  en  disco  (VI) 

Indexados  Secuenciales 


Por  Manuel  AMADO 


a)  Introducción: 

Este  artículo  pretende  ser  un  puente 
entre  la  anterior  serie  de  ficheros  en  disco 
CBM  y  otra  serie  que  tratará  sobre  las 
estructuras  de  información  en  soportes 
magnéticos,  o  lo  que  es  lo  mismo,  diversas 
estructuras  de  organización  de  los  ficheros 
en  las  memorias  de  masa.  El  presente  artí¬ 
culo  es  eminentemente  práctico,  dejando 
los  rigores  académicos  para  la  presente 
serie,  pues  es  simplemente  un  ejemplo  de 
aplicación  de  las  estructuras  de  ficheros  ya 
conocidas  (seeueneial,  relativo  y  acceso 
directo)  que  permite  crear  una  estructura 
de  fichero  más  compleja  como  es  un 
fichero  seeueneial  indexado. 

Antes  de  empezar  con  La  realización 
práctica  de  este  fichero,  veamos  sucinta¬ 
mente  qué  es  un  fichero  secuencia!  inde¬ 
xado.  Con  los  distintos  tipos  de  ficheros 
que  nos  proporcionan  los  discos  CBM, 
podemos  acceder  a  un  registro  determi¬ 
nado  por  dos  métodos  distintos,  inheren¬ 
tes  cada  uno  al  tipo  de  fichero  que  se  está 
tratando: 

1.  — Acceso  secuencia!: 

Hay  que  leer  todos  los  datos  desde  el 
principio  del  fichero  hasta  que  se  encuen¬ 
tra  e)  dato  o  registro  deseado.  Propio  de 
los  ficheros  secuenciales, 

2, — Acceso  directo: 

Se  accede  directamente  al  registro 
deseado  (ficheros  de  acceso  directo  y  rela¬ 
tivos). 

Un  fichero  secuencia!  indexado  (que  a 
partir  de  ahora,  y  para  abreviar,  llamare¬ 
mos  ISAM  “1NDEXED  SEQUENT1AL 
ACCESS  METODE — )  se  llama  indexado 
porque  en  él  el  acceso  a  un  determinado 
registro  se  realiza  mediante  una  clave  de 
acceso.  Esta  clave  puede  ser  un  campo  del 
registro,  una  parte  de  un  campo,  o  una 
combinación  de  varios  campos.  Esta  clave 
de  acceso,  que  evidentemente  lleva  aso¬ 
ciada  la  dirección  en  donde  se  halla  el 
registro  indexado  por  ella,  hay  que  tenerla 
guardada  en  algún  sitio.  En  el  caso  que 
nos  ocupa,  la  clave  se  encuentra  (general¬ 


mente)  en  una  tabla  ordenada,  una  detrás 
de  otra.  He  aquí  el  motivo  de  que  se  llama 
seeueneial,  pues  las  claves  de  acceso  están 
guardadas  secuencialmente, 

b)  Diseño  dei  fichero. 

El  ISAM  que  vamos  a  diseñar  estará 
formado  por  dos  ficheros  distintos,  el 
fichero  índice  que  contiene  las  claves  de 
acceso  y  el  fichero  indexado,  en  donde 
están  los  datos  propiamente  dichos.  Vea¬ 
mos  qué  tipo  de  fichero  de  los  que  pro¬ 
porcionan  los  discos  CBM  se  van  a  usar 
para  el  fichero  indice  y  para  eí  fichero 
indexado: 

1.  Fichero  índice. 

Para  este  fichero  vamos  a  utilizar  dos 
tipos  de  organizaciones  diferentes,  según 
el  momento  en  que  se  vaya  a  procesar  e! 
fichero: 

Acceso  a  los  elementos  del  fichero 
indice:  Para  ello  se  va  a  usar  una  matriz 
bidimensional,  en  donde  se  va  a  guardar 
la  clave  en  una  dimensión  y  la  dirección 
del  registro  asociada  en  la  otra. 

Almacenamiento  en  disco  del  fichero 
índice:  Vamos  a  usar  un  fichero  seeueneial 
para  guardar  este  índice  en  disco.  La  elec¬ 
ción  del  fichero  seeueneial  estriba  en  que 
solamente  al  principio  del  proceso  se  va  a 
leer  todo  el  fichero  Indice  del  disco,  vol¬ 
cando  su  contenido  en  la  matriz  foidimen- 
sional,  y  al  finalizar  el  proceso  se  va  a 
volcar  esta  matriz  al  fichero  en  disco.  Y  el 
fichero  más  rápido  en  lectura  y  escritura 
es  el  seeueneial. 

2,  Fichero  indexado  o  de  datos. 

Este  fichero  tiene  que  permitir  el  acceso 
a  un  registro  determinado.  Los  discos 
CBM  nos  proporcionan  dos  tipos  de 
ficheros  que  cumplen  este  requisito,  los 
ficheros  de  acceso  directo  y  los  relativos. 

Para  facilitar  d  comentario,  vamos  a 
centrarnos  en  primer  lugar  en  el  diseño  de 
un  ISAM  con  un  fichero  relativo  como 
fichero  indexado. 
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c»  Diseño  del  programa. 

El  método  de  búsqueda  de  las  claves  en 
la  matriz  será  el  dicotómico,  muy  rápido 
en  una  tabla  que  esté  ordenada. 

Una  vez  fijados  los  principales  tipos  de 
datos  a  usar,  vamos  a  ver  el  programa 
ejemplo  de  un  ISAM  con  fichero  relativo. 
Este  programa  se  puede  usar  como  rutina 
en  un  programa  de  gestión  normal  y  con¬ 
templa  las  opciones  de  mantenimiento  de 
cualquier  fichero,  como  son  alias,  bajas, 
modificaciones  y  consultas, 

A  continuación  voy  a  describir  el  algo¬ 
ritmo  del  programa. 

El  programa  tendrá  dos  cuerpos  princi¬ 
pales,  el  que  gestionará  el  índice  y  el  que 
recogerá  los  datos  deseados  de!  fichero 
indexado. 

El  programa  se  diseñará  con  un  cuerpo 
principal  de  rutinas,  comunes  a  los  proce¬ 
sos  principales  de  éste,  que  consistirán  en 
altas,  bajas,  modificaciones  y  consultas. 

El  algoritmo  es; 
l)  I  nicial  izacíón  de  variables, 

2}  Rutinas  principales. 

3)  Cuerpo  principal. 

3.1.  Cargar  el  índice  en  la  matriz, 

3.2.  Seleccionar  operación. 

3.3.  Ejecutar  operación  ( altas/bajas  /- 
modífícaciones/consultas ). 

3.4.  Si  se  desea  otra  operación,  ir  a  3,3 

3.5.  Si  no,  grabar  índice  en  disco. 


—Servicio  gratuito  para  nues¬ 
tros  lectores  particulares.  Em¬ 
presas  300  ptas.,  por  línea, 

MERCADILLO 

•  CBM  4,032.  Intercambio  pro¬ 
gramas.  José  Mareé  Mestres.  Calle 
Sevilla,  S.  Te!,  (93)  803  77  51  ,  de  8 
a  3,  VILANOVA  DEL  CAMI  (Barce¬ 
lona).  Referencia  M-1. 

•  ACCESORIOS  VIO  20:  Amplia¬ 
ción  de  memoria  16K  más  varios 
programas,  13.000,  Módulo  de 
expansión  para  6  cartuchos,  1 0.000, 
Cartucho  lenguaje  FORTH  y  manual, 
7,000.  Las  tres  cosas  sólo  por 
25.000.  Jaime,  Te!,  245  46  56* 
BARCELONA,  Referencia  M-2. 

•  Desea  ría  vender  por  40.000  ptas . : 
VIC-2G,  con  cartucho  Super  Expan- 
der,  las  dos  partes  del  Curso,  el 
"joy-stick"  y  un  juego  Indescomp, 
todo  comprado  en  diciembre  del  82. 
Fernando  Martínez,  calle  La  Roda, 
39,  55  D.  Tel.  23  41  82.  ALBA 
CETE.  Referencia  M-3,  •  Tengo  un 
PET  2001 /8K  y  desearía  tener  el 
cassette  "Monitor  para  lenguaje 
Máquina".  También  desearía  con¬ 
tactar  con  usuarios  o  clubs  de  PET  sí 
los  hay,  José  Manual  Cámara  Mas, 
calle  Castor,  32,  bloque  II,  35, 
puerta  1 ,  ALICANTE.  Referencia 
M-4. 


3.3.1.  If  opcración=altas  then  altas 
If  operación— bajas  ihen  bajas 
!f  operado  reconsultas  then  con¬ 
sultas. 

If  operación=modificaciones 
then  modificaciones. 

— Altas; 

(1)  Entrar  clave 

Si  clave=“"  then  3.2 
Buscar  clave.  Guardar  posición  T 
Si  existe  clave  then  entrar  clave 
Entrar  resto  del  registro. 

Pedir  confirmación. 

Si  confirmación=no  then  entrar 
clave. 

Buscar  primer  registro  libre. 
Insertar  en  índice  clave+direc- 
ción  primer  líb.  (posición  T). 
Incrementar  número  de  regis¬ 
tros  ocupados. 

Grabar  registro. 

Goto  entrar  clave,  (1). 

—Bajas: 

(2)  Entrar  clave 

Si  clave=“"  then  3,2 
Buscar  clave.  Guardar  posición  T. 
Si  no  existe  then  entrar  clave,  (2). 
Leer  registro. 

Visualizar  registro. 

Pedir  confirmación. 

Si  confirmación=no  then  entrar 
clave. 


MARKETCLUB 


*  Se  busca  MODEM  para  Comino- 
dore  64.  Precio  a  convenir.  José  M.® 
Maci,  Horno  de  Ladilla,  4,  Mont- 
btanc,  Tarragona  860063,  Horas  de 
comida.  Referencia  M-5 

*  Vendo  VIC-20  (Comprado  en 

noviembre  1 983)*  2  cursos  de 

baste,  libros,  programas.  4  cartu¬ 
chos,  juegos  en  cassette,  cassette, 
joystícks.  Equipo  ideal  para  iniciarse 
en  informática.  Todo  por  59.000 
(Valor  real  90,000).  Llamar  de  9  a 
1 1  h,  noche.  Joan  Sanz.  Tel.  321 8064. 
Travesera  de  las  Corts,  295,  Barce¬ 
lona,  29.  Referencia  M-6, 

*  Compraría  Cassette  y  aplicación 
de  memoria  8K  para  VIC  20.  Precio 
a  convenir.  Manuel  Aranda  (4354900) 
oficina;  91  (6179331)  casa.  Refe¬ 
rencia  M-7, 

CLUBS 

Como  presentación,  valga  decirles 
solamente  que  soy  distribuidor  de 
Commodore  en  Palma  de  Mallorca  y 
al  mismo  tiempo  aficionado  a  los 
microordenadores. 

Estoy  intentando  coordinar  los  es¬ 
fuerzos  de  unos  cuantos  clientes  y 
amigos  para  formar  un  club  de  VIC  y 
64  en  Palma  de  Mallorca.  También  os 
agradeceré  si  me  podéis  ayudar  con 
una  reseña  en  la  revista  para  que  los 
aficionados  de  Palma  sepan  que 
intentamos  formar  un  grupo  de  ami¬ 


Guardar  número  registro. 

Borrar  clave  del  índice. 

Insertar  clave  falsa -i-número  re¬ 
gistro  al  final  del  índice. 
Marcar  registro  como  dado  de 
baja, 

Go  to  (2). 

— Consultas. 

(3)  Entrar  clave. 

Si  clave=“*'  then  3.2 
Buscar  clave. 

Si  clave  no  existe  then  entrar 
clave. 

Leer  registro. 

Visualizar  registro. 

Goto  entrar  clave,  (3). 

—  Modificaciones, 

(4)  Entrar  clave. 

Si  clave=“"  i  lien  3,2 
Buscar  clave. 

Si  clave  no  existe  then  entrar 
clave. 

Leer  registro. 

Visualizar  registro. 

Modificar  registro  (excepto  cam¬ 
po  clave). 

Goto  entrar  clave,  (4). 

En  el  próximo  artículo  os  entregaré  el 
listado  de  uno  de  los  muchos  programas 
que  podrían  corresponder  al  algoritmo 
aquí  descrito.  No  obstante,  a  ver  si  os 
animáis  y  mientras  tanto  hacéis  vuestro 
propio  programa  según  este  algoritmo.  ■ 


gos  del  VIC-20  y  COMMQDORE-64 
RAMON  P  SERNA  SOLER  FOTO 
ESTUDIO  2,  Plaza  de  Sombrereros,  2, 
PALMA  DE  MALLORCA.  Tel.  21  31  62. 
Referencia  C-1. 

Desea  información  sobre  clubs  en 
existencia  y  gente  que  quiera  formar 
uno. 

AGUSTIN  QUEVEDÜ  VELASCO. 

OÑA,  55-45B  MADRID-34 
TEL:  202  94  28 
Referencia  C-2. 

Desea  información  sobre  clubs  en 
existencia  y  gente  que  quiera  formar 
uno. 

PABLO  NISTAL  ALONSO 
c/E  MPEG  NADO,  46  6^B 
MOSTOLES.  TEL:  645  21  70 
Referencia  C-3. 

Hace  poco  tiempo  quedó  estable¬ 
cido  y  reglamentado  el  Club  de  Pro¬ 
gramación  Alaiz,  en  Pamplona.  Está 
dirigido  a  estudiantes  de  B.U.P.  y 
C  0  U.  de  esta  ciudad,  y  el  fin  que 
tiene  es  la  introducción  en  el  mundo 
de  ta  informática  y  programación 
BASIC.  No  tiene,  por  lo  demás,  nin¬ 
gún  fin  lucrativo.  El  club  propiamente 
posee  equipos  COMMODORE  64, 
VIC-20  y  diversos  periféricos  (impre¬ 
sora,  unidad  de  disco  y  cassette}. 
CLUB  ALAIZ.  Pza.  Monasterio  Santa 
Gemma,  s/n,  Tels.:  254480-257704 
PAMPLONA.  Referencia  C-4. 
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BOLSA  DE 
TRABAJO 

PROGRAMADORES  COft/IMO- 
DORE-64,  excelente  oportunidad  | 
para  personas  que  dispongan  de 
programas  de  gestión  y  utilidades  y 
deseen  comercializarlos  en  condi¬ 
ciones  verdaderamente  ventajosas 
(sólo  programas  de  alta  calidad). 
También  programadores  dispuestos 
a  realizar  programas  a  medida. 
Deberán  ponerse  en  contacto  con 
"EAF  m¡crogestiónJ\  preguntar  por 
Francisco  Arambudo,  teléfono;  (93) 
231  95  87  de  Barcelona,  o  escribir 
al  apartado  de  correos  24143  de 
Barcelona.  Referencia  B-1. 

SERVICIOS 

*  En  Barcelona,  clases  de  informá¬ 
tica.  PLAZAS  LIMITADAS,  Len¬ 
guaje  BASIC.  Prácticas  con  micro¬ 
ordenador  VIC-20.  Prof.  E.  Mar¬ 
tínez  de  Carvajal.  Información:  TeL 
(93)  345  10  00.  Señorita  María 
José  (mañanas)  ó  (93)  345  87  75, 


Sr.  Martínez  (fuera  de  horas  de  ofi¬ 
cina).  Referencia  S-1, 

•  Programación  de  ordenadores  per¬ 
sonales;  organización  explotación 
de  ficheros;  programas  ordenadores 
auxiliares,  para  cuestiones  empresa¬ 
riales,  profesionales,  administrati¬ 
vas,  científicas.  Mora  Mas.  Carlos 
II),  41  TeL:  339  98  29.  BARCE- 
LO  NA- 28.  Referencia  S-2. 

■  Tengo  programa  para  confección 
de  documentos,  cartas,  textos,  etc. 
Permite  escribir  lineas  reales  de 
impresora  visualizando  por  pantalla 
y  avisando  al  final  de  cada  línea  por 
timbre.  Visualización  del  texto  en¬ 
tero;  modificaciones  de  línea;  inser¬ 
tar  lineas;  grabación  disco  o  cas¬ 
sette;  lectura  de  datos  de  disco  o 
cassette;  control  por  pantalla  del  texto 
a  rectificar;  acepta;  espacios,  etc.; 
imprime  normal  y  doble  ancho;  pre¬ 
gunta  número  de  copias;  salto 
automático  de  página  en  impresora; 
margen  izquierdo  en  la  página. 
Amadeo  Bargay,  Pza.  Hospital  5-5^, 
Tel. :  874  41  93,  Manresa.  BARCE¬ 
LONA.  Referencia  S-3, 


GALERIA  DE  SOFT 


NOVEDADES 


Microelectrónica  y  Control  ha  sacado  3 
nuevos  programas  para  el  C  64  Introduc¬ 
ción  al  BASIC,  parte  I;  EASY  CALC 
RESULT  (20,000  pts.)  y  M  AGRO  ASSEM 
BLER  (7. 500  pts.).  La  reseña  de  estos  dos 
últimos  saldrá  en  el  próximo  número. 


CURSO  DE  INTRODUCCION 
AL  LENGUAJE  BASIC,  PARTE  I 


Con  este  curso  no  se  incluyen  cintas  de 
programas,  en  su  lugar,  se  ha  añadido  un 
apéndice  con  los  listados  de  los  programas 
a  los  que  se  refieren  las  unidades  didácti¬ 
cas,  para  que  el  usuario  los  entre  por  sí 
mismo  en  el  equipo  y  realice  de  esta 
manera  una  práctica  de  gran  utilidad  en 
BASIC, 


Precio;  3.000  ptas. 
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1.  Capacidad  total  de  memoria  RAM  de  64  K. 
Interpretador  BASIC  extendido  y  sistema  operativo 
residentes  en  ROM, 

2.  Dotado  del  más  potente  chip  sintetizado r  de 
sonido  diseñado  hasta  hoy,  el  COMMODORE  64 
ofrece  3  voces  totalmente  independientes  con  una  gama 
de  9  octavas.  El  programa  puede  controlar  la 
envolvente,  la  afinación  y  la  forma  de  onda  de  cada 
voz,  convirtiendo  al  COMMODORE  64  en  el  mejor 
simulador  de  instrumentos, 

3.  Conecta  ble  directamente  a  toda  una  gama  de 
periféricos,  incluyendo  unidad  de  discos,  impresora  de 
matriz  de  puntos  o  de  margarita,  plotter, 
comunicaciones  locales  y  remotas...,  y  mucho  más. 

4  Pantalla  de  alta  resolución  en  color  con  320  X  200 
puntos  directamente  direccionables.  Capacidad  en 
modo  carácter  de  25  líneas  por  40  columnas. 

5.  El  chip  de  video,  único  en  su  género,  permite  el 
uso  de  8  «Sprites»  (figuras  móviles  en  alta  resolución  y 
color).  Los  «Sprites»  pueden  moverse  independiente¬ 
mente  por  programa  de  «pixel»  en  «pixel». 


6.  Teclado  profesional  con  mayúsculas  y  minúsculas, 
más  62  caracteres  gráficos,  lodos  ellos  disponibles  en  el 
teclado  y  visualizares  en  16  colores,  en  forma  normal 
o  bien  en  video  invertido. 


7,  Encontrará  a  su  disposición  una  completa  gama  de 
programas  profesionales,  incluyendo  proceso  de  textos, 
sistemas  de  información,  modelos  financieros, 
contabilidad  y  muchas  más  aplicaciones. 

8,  Están  en  fase  de  desarrollo  otros  lenguajes  tales 
como  LOGO,  COMAL,  PILOT,  etc. 


'.  Opción  de  un  segundo  procesador  Z-80  para 
trabajar  con  sistema  operativo  CP/M  (R). 


commadore 

COMPUTER 


MICROELECTRONICA  Y  CONTROL 
c/  Taquígrafo  Serra,  7,  5  o  Barcelona-29 
c/  Princesa,  47,  3o,  G  Madrid-8 


